onst
tmpFN='c:\tmp\tmp.doc';
begin
form1.ClientDataSet1.Active:=true;
Tblobfield(form1.ClientDataSet1.FieldByName('wlc2')).SaveToFile(tmpFN);
olecontainer1.CreateObjectFromFile(tmpFN,false);
OleContainer1.DoVerb(ovshow);
end;
tmpFN='c:\tmp\tmp.doc';
begin
form1.ClientDataSet1.Active:=true;
Tblobfield(form1.ClientDataSet1.FieldByName('wlc2')).SaveToFile(tmpFN);
olecontainer1.CreateObjectFromFile(tmpFN,false);
OleContainer1.DoVerb(ovshow);
end;
到这出错了! 为什么?