Загрузка текста RTF из базы данных в TRichEdit

В настоящее время я нахожусь в процессе миграции нашего программного решения с Delphi 7 на 2010. В основном изменения были простыми, и осталось лишь небольшое количество препятствий.

В форме мы используем TRichEdit, который отображает текст в формате RTF, взятый из поля BLOB-объекта в базе данных MSSQL. Вот как это работает в 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);

Это будет отображать RTF, как и ожидалось в компоненте TRichEdit, но тот же код в Delphi 2010 отображает RTF как простой текст с табуляцией между каждым символом. Я предполагаю, что это во многом связано с переходом с Ansi на Unicode, но мне не удалось исправить проблему.

Любая помощь в этом будет очень благодарна. Спасибо