row ;long row 在DELPHI中是TVarBytesField类型
TBlobField()是报错
TO : tokey
var
MYStream: TMemoryStream; //取出数据库中的WORD 文件
begin
MYStream := TMemoryStream.Create;
MYStream.Clear;
(Table1.FieldByName('zsfa') as TBlobField).SaveToStream(MYStream);
if MYStream.size>0 then
begin
MYStream.Position := 0;
OleContainer1.LoadFromSTREAM(MyStream);
OleContainer1.DoVerb(1);
End;
运行到OleContainer1.LoadFromSTREAM(MyStream);
为何总提示1%以存在