Объединить в MemoryStream форматированный текст и изображение

[Zerofill]

Здравствуйте!
У меня вот такая проблема. Имеется RxRichEdit. В него я из БД загружаю изображение (поле типа blob), которое сохраняется в потоке. Потом извлекаю из БД форматированный текст, который также сохраняю в потоке. После чего потоки объединяю, и загружаю содержимое в RxRichEdit. Но! Загружается только изображение. Текста нет. Помогите, пожалуйста!

TMemoryStream *stream=(TMemoryStream *)dm1->IBQuery1->CreateBlobStream(dm1->IBQuery1->FieldByName("IMAGE"),bmRead);
        stream->Position=0; p->LoadFromStream(stream);
        Clipboard()->Assign(p);
        RTFProtectStatus(false);
        RxRichEdit1->Clear();
        RxRichEdit1->Paragraph->Alignment=taCenter;
        RxRichEdit1->PasteFromClipboard(); delete stream;
        RxRichEdit1->Lines->Add(" ");
        RxRichEdit1->Paragraph->Alignment=taLeftJustify;
        TMemoryStream *s1=new TMemoryStream; s1->Position=0;
        RxRichEdit1->Lines->SaveToStream(s1);
        TMemoryStream *m=new TMemoryStream; m->Position=0;
        m=(TMemoryStream *)dm1->IBQuery1->CreateBlobStream(dm1->IBQuery1->FieldByName("DESC"),bmRead);
        m->Position=0; s1->CopyFrom(m,m->Size); s1->Position=0;
        RxRichEdit1->Lines->LoadFromStream(s1);
        delete m;delete s1;