[Nyctos Kasignete]

Сообщение от lubja

как нормально(!) записать строку в файл и обратно?

Использовать тип текстового файла.

Код:

var
  f: TextFile;
  str: string[8];
begin
  // запись
  Str := 'строка';
  AssignFile(f, 'myFile');
  Rewrite(f);
  Write(f, Str);
  CloseFile(f);

  // чтение
  AssignFile(f, 'myFile');
  Reset(f);
  Read(f, str);
  CloseFile(f);
  ShowMessage(str);
end;