[Ross]

У меня такая же фигня.
Когда запускается моё приложение ищется файл, если файл найден, то читает от туда и потом удаляет его (файл), а при выходе должен сохранять в файл. до определённого момент всё работало нормально, но потом всё отрубило, ну ни как не могу справиться с этой ошибкой. Я попробовал вот такую вещь:

Код:

1 2 3 4 5 6 7 8 9 10 11

if FileExists(GetCurrentDir + '\' + FileUs) = true then DeleteFile(GetCurrentDir + '\' + FileUs); AssignFile(UsersFile, GetCurrentDir + '\' + FileUs); {$I-} Rewrite(UsersFile); {$I+} if IOResult <> 0 then   begin     CloseFile(UsersFile);     AssignFile(UsersFile, GetCurrentDir + '\' + FileUs);     Reset(UsersFile);     Append(UsersFile);

Файл то он создаёт, но отказывается писать в него, почему так?