Как загнать текстовый файл в Memo

  • Автор темы Renegade
  • Дата начала
Статус
Закрыто для дальнейших ответов.
A

a3design

#3
Еще один вариант, не такой компактный, но позволяет обрабатывать файл "на лету":
Код:
var
f:TextFile;
s:string;
begin
AssignFile(..); Reset(f);
while not eof(f) do
begin
readln(f,s);
//Обрабатываем строку как хотим
Memo1.Lines.Add(s);
end;
CloseFile(f);
end;
Таким образом, если слегка изменить код, можно загнать в Memo любой файл.
 
Статус
Закрыто для дальнейших ответов.