OpenDialog

[quendolineDD]

Falls es wirklich in ein Edit gehen soll und die Textdatei einzeilig ist, dann kannst du es auch so machen:

Delphi-Quellcode:

...
var
atxtline: TStringList;
begin
 atxtline.Create;
 atxtline.LoadFromFile(OpenDialog1.Filename);

 Edit1.Text:= atxtline.Items[0];

 atxtline.Free;
end;