Die Idee ist jetzt zwar unelegant, aber schreibe doch das, was du anhängen willst per Rewrite() in eine neue Datei und dann liest du Original und Anhängsel in einen TFileStream ein und kopierst beide zusammen.
Delphi-Quellcode:
var
Body, Appendix: TFileStream;
{...}
Body := TFileStream.Create('Original', fmReadWrite);
try
Appendix := TFileStream.Create('Anhängsel', fmRead);
Body.CopyFrom(Appendix, Appendix.Size);
finally
Body.Free;
Appendix.Free;
end;
So in der Art - hab ich jetzt nicht getestet.
MfG,
d3g