TCustomMemo.Lines und Savedialog

[Schaedel]

Delphi-Quellcode:

var
  s : string;
  F: TextFile;

begin
  AssignFile(F, 'c:\test.txt');
  Reset(F);
  while not eof(f) do begin
    Readln(F, S);
    memo1.Lines.add(s);
  end;
    CloseFile(f);

Jetzt musst du nur noch schauen welche Line du nicht haben willst..