Ошибка I/O 183

← →
KMI © (2002-12-11 11:12) [0]

Всех приветствую! Помогите пожалуйста, с одной ошибкой. При записи в текстовый файл выводится ошибка ввода-вывода 183. Что это за ошибка? И с чем она может быть связана?
Исходный код:

var TF: TextFile; file: string; text: string; ... AssignFile(TF,file); ReWrite(TF); // выдает ошибку WriteLn(TF,text); CloseFile(TF);

← →
FreeLancer © (2002-12-11 11:22) [1]

There are two standard text-file variables, Input and Output. The standard file variable Input is a read-only file associated with the operating system’s standard input (typically, the keyboard). The standard file variable Output is a write-only file associated with the operating system’s standard output (typically, the display). Before an application begins executing, Input and Output are automatically opened, as if the following statements were executed:

AssignFile(Input, ""); Reset(Input); .... AssignFile(Output, ""); Rewrite(Output);

← →
KMI © (2002-12-13 12:37) [2]

Мне хотелось бы понять именно причину ошибки...

← →
Anatoly Podgoretsky © (2002-12-13 12:56) [3]

Твоя ошибка спрятана где то за ..., которые ты не привел, но я бы поостерегся использовать зля переменных такие имена как File, Text

← →
KMI © (2002-12-13 17:57) [4]

Есть массив из 2-х столбцов и N строк. Строка состоит из имени файла и строки, которую нужно в этот файл записать. Отсюда код:

var TF: TextFile; db: array of array of string; .... for i:=0 to N-1 do begin AssignFile(TF, db[0,i]); ReWrite(TF); WriteLn(TF, db[1,i]); CloseFile(TF); end;

Файл создается правильно, но строка не записывается, а оператор ReWrite дает ошибку...

← →
filimonic (2002-12-18 00:01) [5]

А у файла случайно атрибут (только чтение) не стоит?

AssignFile(TF, db[0,i]);
{$I-}
ReWrite(TF);
WriteLn(TF, db[1,i]);
CloseFile(TF);
{$I+}
if IOResult <> 0 then "Имeет место ошибка"

На самом деле я наблюдал еще такие грабли. Если в проекте использовать TFileStream и обычный доступ к файлам (Reset, Rewrite), то этот обычный доступ начинает неуловимо (и невоспроизводимо) глючить. Может быть, дело в этом?

Ошибка I/O 183 Найти похожие ветки