Bestimmten Text unter eine bestimmte Zeile einer Textdatei

[DeddyH]

Wieso nicht einfach Memo.Text per Insert in die Stringliste einfügen?

[edit] Gerade ausprobiert, tut.

Delphi-Quellcode:

var sl: TStringlist;
begin
  sl := TStringlist.Create;
  try
    sl.LoadFromFile(Filename);
    sl.Insert(1,TrimRight(Memo1.Text));
    sl.SaveToFile(Filename);
  finally
    sl.Free;
  end;
end;

[/edit]