ich hab nochmal schnell ein grobes beispiel geschrieben.... mach einfach nen button und ein memo auf deine form, und erstell die datei "test.txt" in C:\...
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
txt: TextFile;
line: string;
begin
if FileExists('C:\test.txt') then
begin
AssignFile(txt, 'C:\test.txt');
Try
Reset(txt);
while not EOF(txt) do
begin
ReadLn(txt, line);
Memo1.Lines.Add(line);
end;
finally
CloseFile(txt);
end;
end;
end;