请教！如何将一个ADOQuery的Blob字段的值赋给RXMemoryData的Blob字段？ ( 积分: 200 )

请教！如何将一个ADOQuery的Blob字段的值赋给RXMemoryData的Blob字段？

我用如下方法，在RxMemoryData的Blob字段里却得不到所存的图形文件：
var
drawStream: TMemoryStream;
begin
ADOtable1.Open;
ADOtable1.First;
RxMemoryData1.Open;
RxMemoryData1.First;
while not ADOtable1.eof do
begin
RxMemoryData1.Edit;
drawStream := TMemoryStream.Create;
TBlobField(ADOtable1.FieldByName('draw')).SaveToStream(drawStream);
TBlobField(RxMemoryData1.FieldByName('draw')).LoadFromStream(drawStream);
RxMemoryData1.Append;
RxMemoryData1.post;
ADOtable1.Next;
drawStream.free;
end;
end;

已经用kbmMemTable解决，跟贴给分！