Показать сообщение отдельно
  #3  
Старый 19.03.2022, 14:34
Аватар для Kailon
Kailon Kailon вне форума
Активный
 
Регистрация: 06.06.2010
Сообщения: 339
Версия Delphi: 10.4
Репутация: 429
Сообщение

Всё работает нормально и без ошибок.
Код:
procedure TForm1.FormCreate(Sender: TObject);
const
  FilePath = 'D:\TestFile.txt';
var
  F: TextFile;
begin
  AssignFile(F, FilePath);
  Rewrite(F);
  Writeln(F, 'Text text text');
  CloseFile(F);
  Memo1.Lines.Create.LoadFromFile(FilePath);
end;
Цитата:
Сообщение от alexdudchenko2022
Здравствуйте, проблема в следующем мне нужно что бы при запуске программы создавался файл в определенную директорию и сразу его подгружать в Мемо. Но проблема в том что при открытие программы не успевает обработать и загрузить появляется ошибка нет файла.
Из вашего сообщения не понятно, что и в каких объёмах пишется в файл.
__________________
Всегда пишите код так, будто сопровождать его будет склонный к насилию психопат, который знает, где вы живете.
Ответить с цитированием