RTF-Dokument in DB, raus kommt Müll

[emsländer]

Hallo zusammen,

ich glaube, das ich das ein wenig eingrenzen konnte:

wptext.SaveToFile(sAppdir+'\danach.rtf'); => hier ist das Dokument noch ok. Jetzt möchte ich das Zeug in einen string speichern, um das speichern in der Datenbank vorzubereiten:
_stmp := wptext.text Wenn ich diesen Variableninhalt nun in eine Datei speichere,

Delphi-Quellcode:

fs := tfilestream.create(sAppDir+'\tmp.rtf', fmcreate);
fs.Write(_stmp[1],Length(_stmp));
fs.free;

speichere, hab ich da Müll stehen.

Gruss

EL