Hallo zusammen,

ich habe eine ältere Applikation "aufzubohren". Darin werden u.a. Texte in Memos geladen und dann via stored procedure in eine firebird db (1.5) geschrieben. Klappt alles ganz gut. Jetzt taucht das problem auf, statt einfacher Texte RTF-Dateien mit Formatierungen und Grafiken zu lesen. Der Text wird auch korrekt gespeichert, aber die Formatierungen gehen verloren. Ich denke mal hier....

with prcSave do
begin
ParamByname('FIRST_ID').AsInteger := ActId;
ParamByname('FIRST_NAME').AsString := edFirstName.Text;
ParamByName('FIRST_STORY').asString := ( edStory.Lines.GetText );
......
ExecProc;
end;

...liegt das Problem.

Die Zeit drängt ein wenig und ich finde in den Manuals nix passendes...und weiß deswegen nicht, ob es überhaupt geht...
Kennt jemand eine Lösung?

In was für einen Feldtyp lädst du die Texte? Hier würde sich ein BLOB anbieten.

...sorry, habe ich vergessen: ja der Feldtyp von FIRST_STORY ist Blob Subtype Text!

Und wenn du dir edStory.lines.getText ausgeben lässt stehen dort auch die Formatierungen drin?

...das sehe ich eben nicht. Der Debugger spuckt nix aus. Ich weiß also nicht, ob die Gettext-Methode schon die Formatierungen entfernt oder die Zuweisung an den Parameter das tut....

Bau doch ein showMessage(edStory.Lines.getText); ein. Am Übergang nach Firebird kann es eigentlich nicht liegen. String ist string. Da ich selber nicht mit RTF arbeite, weiß ich grad nicht ob getText mit den Formatierungen ist.

Versuch mal eine Zuweisung per .asBlob

...Ok, das war schon mal ein guter Tipp: die Formatierungen sind schon in der Methode Gettext entfernt...gibt es da eine Alternative?

...asBlob hat denselben Effekt, aber die Formatierungen scheinen ja schon vorher eliminiert zu sein....

Ist das ein Standardmemo? Versuchse mal mit .Lines.Text