in eine Ini – Datei den Text von einem Memofeld speichern

[Remote1]

Hab’s jetzt mal mit noch ner StringList probiert, aber ist natürlich ein wenig billig gemacht (aber es funktioniert zumindest schon mal annähernd so wie ich das will)
Ich denke aber mal, dass ich da irgend wann Probleme mit dem
temp.LoadFromFile(pfad);
bekommen werde, da es ja auch immer mehr Text wird welcher geladen werden muss.
Da würde schon mal mein Programm immer langsamer und was ist wenn der Arbeitsspeicher nicht mehr ausreicht???
Zumal hat ein Memo ja auch eine begrenzte Anzahl von Zeichen (habs mal ausprobiert, waren ca. 56511)
Also Ihr seht, keine perfekte Lösung, aber ein Ansatz.
Vielleicht habt Ihr ja noch ne zündende Idee.

Delphi-Quellcode:

if form1.Memo1.Lines[0]=''
 then
  begin
   Form1.Memo1.Clear;
   exit;
  end;
pfad:='D:\memo.txt';
temp:=TStringList.Create;
if not fileexists(pfad)
 then
  begin
   temp.Clear;
   temp.SaveToFile(pfad);
  end;
temp.LoadFromFile(pfad);
temp.Add('['+datetimetostr(now)+']');
temp.Add(memo1.Text);
temp.Add('');
temp.SaveToFile(pfad);
memo1.Clear;
temp.Clear;

[edit=Christian Seehase]Delphi-Tags gesetzt. Bitte künftig selber machen. Danke. Mfg, Christian Seehase[/edit]