Was willst du denn machen?
Aus der Datei lesen und ins Memo schreiben?
Das müsste so gehn:
Delphi-Quellcode:
procedure TForm1.Button2Click(Sender: TObject);
var
F:TextFile;
tmp : String;
begin
If OpenDialog1.Execute Then
Begin
AssignFile(F,OpenDialog1.Filename);
Reset(F);
Readln(F,tmp);
CloseFile(F);
Memo1.Lines.Add(tmp);
end;
end;
Hoika war schneller...