Richedit et firebird

Bonjour,

J'essaie de sauvegarder le contenu d'un TRichEdit et sa mise en forme dans une variable de type UnicodeString. Je ne dois pas passer par la sauvegarde d'un fichier sur le disque dur. Je dois avoir ceci :

Code:

---

1 2 3 4 5 6

{\rtf1\ansi\ansicpg1252\deff0\deflang1036{\fonttbl{\f0\fnil\fcharset0 MS Sans Serif;}{\f1\fnil\fcharset0 Cambria;}} \viewkind4\uc1\pard\f0\fs16 new\par \par \ul\b\i\strike\f1\fs56 test\par ffdgfd\ulnone\b0\i0\strike0\f0\fs16\par }

---

Au lieu de ça, je récupère toujours ce résultat :

Code:

---

1 2 3 4

new   test ffdgfd

---

Vous avez une solution ?

Cette variable me sert ensuite à mettre à jour une bdd firebird.

Merci

Hello,

Essaye ceci :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

// vREdt1: TRichEdit avec PlainText=false ShowMessage(vREdt1->Lines->Text);   TMemoryStream* pMem = new TMemoryStream; vREdt1->Lines->SaveToStream(pMem);   TStringList* pStrings = new TStringList; pMem->Position = 0; pStrings->LoadFromStream(pMem); ShowMessage(pStrings->Text);   delete pStrings; delete pMem;

---

Merci! Ça fonctionne.

Je me doutais que c'était une histoire de flux mais je pensais qu'il y avait plus simple.