103, 105 I/O error

← →
Aldor © (2004-06-23 12:35) [0]

?? Открываю файл, произвожу действия, вылазит exception с неизвестными (по крайней мере мне) кодами.

var OutFile: System.Text; begin AssignFile(OutFile, FileName); try Reset(OutFile); WriteLn(OutFile, SomeString); // <- здесь EInOutError (code = 105) finally CloseFile(OutFile); end;

Если строки между try и finally закомментировать, то ошибка на строке CloseFile с кодом 103.

Причем посмотрел в SysUtils коды ошибок, там 103 и 105 нету:
ErrorMap: array[0..6] of TErrorRec = ( (Code: 2; Ident: SFileNotFound), (Code: 3; Ident: SInvalidFilename), (Code: 4; Ident: STooManyOpenFiles), (Code: 5; Ident: SAccessDenied), (Code: 100; Ident: SEndOfFile), (Code: 101; Ident: SDiskFull), (Code: 106; Ident: SInvalidInput));
Может кто подскажет keyword в help"е, I/O где error codes описываются?

← →
MBo © (2004-06-23 12:54) [1]

А как сочетается Reset и WriteLn???

>keyword в help"е, I/O где error codes описываются?
I/O errors

← →
ЮЮ © (2004-06-23 13:01) [2]

Reset(OutFile);
Help> If F is a text file, F becomes read-only.
WriteLn(OutFile, SomeString);
EInOutError> File not open for output

← →
Aldor © (2004-06-23 13:04) [3]

OOOOPS!!!! Ой!!

Дико извиняюсь, ужасно стыдно, перепутал Reset и ReWrite %)))

Надо больше спать:)

← →
WondeRu © (2004-06-23 13:37) [4]

Поэкспериментируй с FileMode (см. F1)!

Delphi help, предметный указатель, I/O errors

103, 105 I/O error Найти похожие ветки