rxrichedit中的数据保存到数据库，但不能将数据中保存的数据在rxrichedit中显示出来？
步骤：
1.rxrichedit中数据保存到数据库中。
2.将数据库中的数据读取出来并显示在rxrichedit上。

问题：不能在rxrichedit中显示刚才步骤1中保存的数据？请各位大侠救命啊！


具体代码如下（开发环境 Delphi5）：

1.保存数据
rxrichedit.Lines.SaveToStream(res);
...
qry.Close;
qry.SQL.Text := ' Insert into TFile(FGid, FContent) (:FGID, :FContent) ';
qry.ParamByName('FGid').AsInteger := 1;
qry.ParamByName('FContent').LoadFromStream(res, ftBlob);
qry.ExecSQL;
...
CommitTransaction;
...
通过查询数据库，数据已经保存到数据库中

2.读取数据显示在rxrichedit上
qry.SQL.Text := 'select * from TFile where Fgid = 1';
qry.Open;
...
TBlobField(qry.FieldByName(FContent)).SaveToStream(res);
...
rxRichEdit.Lines.LoadFromStream(res);

rxRichEdit上显示空白。很奇怪，研究了好久，都没有找出原因，请大侠们帮帮忙




[解决办法]
试试:

从库中读出文本,直接赋值给Rtf属性

richTextBox1.Rtf　= 文本
[解决办法]
是rxRichEdit控件，好像赋不了rtf属性吧？
[解决办法]
加上res.position := 0 就可以了。结贴了
[解决办法]
保存
ADOQuery1.EDIT;
RXRichEdit1.Lines.SaveToFile('C:\TEMPEMAIL.RTF');
TBlobField(ADOQuery1.FieldByName('XXNR')).LoadFromFile('C:\TEMPEMAIL.RTF');
ADOQuery1.POST;

显示
TBlobField(ADOQuery1.FieldByName('XXNR')).SaveToFile('C:\TEMPEMAIL2.RTF');
RXRichEdit1.Lines.LoadFromFile('C:\TEMPEMAIL2.RTF');