我用下面的语句做,好像保存成功了,但是打开后就是一塌糊涂.应该怎么写呀??var
Stre:tmemorystream;
begin
Stre:=TMemoryStream.Create ;
Doc_ole.SaveToStream(stre); with dm1.tablegczl do
begin
Edit;
TBlobField(fieldbyname('wendan')).LoadFromStream(Stre);
Post;
FreeAndNil(Stre);
end;
Stre.free;
Stre:tmemorystream;
begin
Stre:=TMemoryStream.Create ;
Doc_ole.SaveToStream(stre); with dm1.tablegczl do
begin
Edit;
TBlobField(fieldbyname('wendan')).LoadFromStream(Stre);
Post;
FreeAndNil(Stre);
end;
Stre.free;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货