statt
WriteLn(datei, satz + satz2);
kann man doch auch
Write(datei, satz);
WriteLn(datei, satz2);
schreiben, oder?
bei der stringlist würd ich noch n free hinter klemmen.
Delphi-Quellcode:
...
Datei := TStringlist.Create;
satz := '...';
satz2 := '...';
try
Datei.Add(satz + satz2);
Datei.SaveToFile('c:\test.txt');
finally
Datei.Free;
end;
...