TStringList.line(1)?!

[marabu]

Hi,

schau mal:

Delphi-Quellcode:

begin
  with TStringList.Create do
  try
    LoadFromFile(ExtractFilePath(ParamStr( 0 )) + 'text.txt');
    edit1.Text := Strings[0];
  finally
    Free;
  end;
end;

Freundliche Grüße