Mehrzeiliger ListBoxText überschreibt beim Speichern alten Text

Ich hab eine ListBox mit mehrzeiligem Text welcher in einer .txt Datei gespeichert werden soll. Das mach ich mit ...
Code:
 ListBox1.Items.SaveToFile('datei.txt');
Allerdings wird dabei bereits in der Datei vorhandener Text überschrieben,welchen ich aber auch gerne behalten würde.

Hat mir jemand einen Ansatz? :)
 
Einfach geht es so:
Var
StrList : TStringList;
begin
....
Strlist:=TStringList.Create;
try
// vorher den alten Text lesen
Strlist.LoadFromFile('datei.txt'); // alten Text laden
....
// dann den Neuen hinzufügen
StrList.AddStrings( ListBox1.Items );

// und wieder speichern
StrList.SaveToFile('datei.txt');
....
finally
Strlist.Free;
end;
...

Achtung: Schnell getippt und nicht geprüft :)

vop
 

Neue Beiträge

Zurück