Je suis actuellement en train de migrer notre solution logicielle de Delphi 7 vers 2010. La plupart du temps, les changements ont été simples et il ne reste plus qu'un petit nombre d'obstacles à franchir.Chargement du texte RTF de la base de données dans TRichEdit
Sur un formulaire, nous utilisons un TRichEdit qui affiche le texte rtf saisi à partir d'un champ blob dans une base de données MSSQL. Voici comment cela a fonctionné dans Delphi 7:
//Get RTF text from Blob field using TADOQuery
rtfStream := sql.CreateBlobStream(sql.FieldByName('rtftext'), BmRead) as TMemoryStream;
//Load into TRichEdit
RichEdit.PlainText := False;
RichEdit.Lines.LoadFromStream(rtfStream);
Ceci afficherait la RTF comme prévu dans le composant TRichEdit, mais le même code dans Delphi 2010 affiche la RTF sous forme de texte avec des onglets entre chaque caractère. Je suppose que cela a beaucoup à voir avec le passage d'Ansi à Unicode, mais je n'ai pas eu de chance pour rectifier le problème.
Toute aide apportée à ce sujet serait grandement appréciée. Merci
http://kspnew.googlecode.com/svn-history/r334/trunk/additional/bass/AnsiStringStream.pas ou quelque chose de similaire? –