[NIch]

Ошибка такая..."процесс не может получить доступ к файлу, так как этот файл занят другим процессом"...это покажет сообщение ShowMessage(SysErrorMessage(32))...

Код:

begin
  AssignFile(f , FileName);
  ReWrite(f);
  ShowMessage(SysErrorMessage(32));
  CloseFile(f);
end;