[Mitiay]

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

Ну а дальше, заполняете полученным текстом стринглист и из него передаёте построчно в едиты, примерно так

Код:

...
var
 sl: TStrings;
 i: integer;
begin
 sl:= TStringList.Create;
 
 sl.Text:= .Get(); // Вот здесь наполнение текстом

 for i:= 0 to sl.Count-1 {или указать явно, напр. 5} do
  (FindComponent('Edit' + IntToStr(i+1)) as TEdit).Text:= sl[i];
 sl.Free;
end;

Ругается на sl: TStrings;