Показать сообщение отдельно
  #5  
Старый 15.01.2010, 17:51
harbor harbor вне форума
Новичок
 
Регистрация: 15.01.2010
Сообщения: 83
Репутация: 10
По умолчанию

тоже самое если делаю так

AssignFile(myFile, Edit1.Text);
// if not FileExists(Edit1.Text) then
Rewrite(myFile);
f7:= 'строка' ;
// StrPCopy(buf1,f7);
WriteLn(myFile, f7);

пока файл не закрою. другим программам он недоступен
а мне желательно в программе держать файл открытым на запись
Ответить с цитированием