freizeile einfügen

[ichbins]

Du kannst ja eine leere Zeile dazwischenhängen:

Delphi-Quellcode:

memo1.lines.add(edit1.text);
memo1.lines.add('');
memo1.lines.add(edit2.text);

ich denke du lädtst die Datei mit memo.loadfromfile. mach's besser so:

Delphi-Quellcode:

var
  t:textfile;
  zeile:string;
begin
  assignfile(t,DATEINAME);
  reset(t);
  readln(t,zeile);  //1 Zeile einlesen
  memo1.lines.add(zeile);
  memo1.lines.add('');
  readln(t,zeile); 
  memo1.lines.add(zeile);
  closefile(t);
end;