Bei neueren Delphi-Versionen kann man auch was aus IOUtils.pas nutzen:
Delphi-Quellcode:
class procedure TFile.AppendAllText(const Path, Contents: string; const Encoding: TEncoding);
class function TFile.AppendText(const Path: string): TStreamWriter;