I/O error 32 при работе с текстовым файлом.

← →
neat (2005-07-15 10:29) [0]

Вроде проще некуда:

var f : TextFile;

AssignFile(f, "TF.txt");
Append(f);
Writeln(f, QCons.FieldByName("OAO_Name_").AsString);
Flush(f);
CloseFile(f);

Выполнение останавливается на процедуре Append(f) с сообщением "I/O error 32". Файл существует, данные из него читаются. Что бы это значило?

← →
gydvin (2005-07-15 10:39) [1]

procedure TForm1.Button1Click(Sender: TObject); var f : TextFile; s:string; begin AssignFile(f, "d:\11111.txt"); Append(f); s:="мама"; Writeln(f, s); Flush(f); CloseFile(f); end;

все работает!!!!!!!!!!!

← →
PVOzerski © (2005-07-15 11:04) [2]

Файл, часом, во время Append не открыт из другого процесса/потока? А права на запись для него у тебя в порядке (это если NTFS). А он не с атрибутом read-only?

← →
Anatoly Podgoretsky © (2005-07-15 11:16) [3]

Просто он где то еще открыт на чтение/запись

← →
neat (2005-07-15 12:20) [4]

Всё верно, так и оказалось, но я не обратил на это внимание, потому что пока искал описание кода ошибки наткнулся(сейчас уже не помню где) на примерно следующие слова:" ... если этот файл уже был открыт, повторный вызов AssignFile(f, FileName) закрывает файл и открывает его снова ...". Спасибо всем.
И ещё, не подскажите, где найти описание кодов ошибок. Заранее благодарю.

← →
Kolan © (2005-07-15 12:23) [5]

Runtime Errors в Help"е

F1 -> I/O Errors

neat (15.07.05 12:20) [4]
наткнулся(сейчас уже не помню где) на примерно следующие слова:" ... если этот файл уже был открыт, повторный вызов AssignFile(f, FileName) закрывает файл и открывает его снова ...".

Выбрось нафиг подобную книгу

I/O error 32 при работе с текстовым файлом. Найти похожие ветки