183 -невозможно создать файл, так как он уже существует. Для меня это не ошибка, так как я допускал и перезапись файла.
Не уверен, что это особо корректно, но вставив ненужную мне проверку кода ошибки IOresult, у меня стало все работать без проблем
.................................
AssignFile(f,'file.txt');
{$I-}
ReWrite(f);
If IOresult=183 then begin end;
{$I+}
Спасибо за подсказки.
|