我现在是用ole连接的，并且写了段程序如下，不知道为何保存不上：
MemoryStream := TMemoryStream.Create;
Try
OleContainer1.SaveToStream(MemoryStream);
MemoryStream.Position := 0;
if not (cdstdjh.State in [dsinsert,dsedit]) then
cdstdjh.Edit;
Tblobfield(cdstdjh.FieldByName('fj')).LoadFromStream(MemoryStream);
finally
MemoryStream.Free;
end;
