高手请帮我看看这段代码1有关OLE的 (50分)

这是把图形存储到SQL的BLOB（image)字段中：
Stream:TMemoryStream;
begin
stream:=TMemoryStream.create;
OleContainer1.SaveToStream(stream);
DM_General.InfoADODataSet.open;
DM_General.InfoADODataSet.Append;
TBlobField(DM_General.InfoADODataSet.FieldByName('零件')).LoadFromStream(Stream);
DM_General.InfoADODataSet.Post;
DM_General.InfoADODataSet.Close;
stream.Free;
OleContainer1.Enabled:=False;
end;
这是把图形从SQL的BLOB（image)字段中读取出来，再显示在OLE中：
Stream:TMemoryStream;
begin
Stream:=TMemoryStream.Create;
oleContainer1.Enabled:=True;
TBlobField(DM_General.InfoADODataSet.FieldByName('零件图')).SaveToStream(Stream);
Stream.position:=0;
OleContainer1.LoadFromStream(Stream);
Stream.Free;
end;
执行的结果是编译没问题，但在运行的时候，存储没问题。但在执行读取的时候，显示‘Stream read error’，出错的语句是：OleContainer1.LoadFromStream(Stream);

我头都大了，很急的！谢谢！

读的时候先存成文件看看能不能打开。