江湖救急！请教 OleContainer，中取得 大2近制 Stream数据 怎么保存的数据库

Question

var
  ADDD:olevariant;
  ErrorMsg:widestring;
  success:boolean;
begin
  try
    fillDataSet;
    ErrorMsg:='打开链接时出错';
    ADDD:=cdsResult.Data;
    OpenServer(ServerGUID_TechnologyWrite);
    ITechnologyWriteDisp(GetServer).InsertTechnologyData(ADDD,ErrorMsg);
    if success then
    SetMessage(Self.Caption+'：保存成功！');
  except
    raise;

Answer 1

TBlobField.LoadFromStream(Stream: TStream);

Answer 2

blobfield(adoquery1.fields[i]).loadfromstream(myStream);

Answer 3

var
    Stream:TMemoryStream;
begin
  stream:=TMemoryStream.create;
  Stream.Position:=0;
  OleContainer1.SaveToStream(stream);
  ......
 TBlobField(FieldByName(‘零件图')).SaveToStream(Stream);
....这样就可以拉！我一直是这么处理的，大图形文件都可以啊