承蒙各位的关照,我在把BMP文件存入ACCESS库中的OLE字段时,OLE字段上显示
是“长二进制数据”(我的原意应该显示“BMP图象”),在ACCESS环境下双击该
字段,却显示“在Microsoft Access 与OLE服务器通讯时出现问题。”
在下的程序如下:
procedure TForm1.Button1Click(Sender: TObject);
var s:tfilestream;
begin
s:=tfilestream.create('c:/picturedate/mainp.bmp',fmopenread);
S.Seek(0,soFromBeginning);
table1.Append;
table1.edit;
Tblobfield(table1.Fieldbyname('1')).loadfromstream(s);
table1.Post;
s.free;
end;
在下用lbwave的方法也是如此:
procedure TForm1.Button1Click(Sender: TObject);
var s:Tstream;
begin
table1.Append;
table1.edit;
s:=table1.createblobstream(table1.fieldbyname('1'),bmReadWrite);
image1.picture.bitmap.savetostream(s);
table1.Post;
s.free;
end;
不知是何原因,望大侠能及时给予答复,谢谢!
关键是:我的意图是想在ACCESS环境中能双击时打开OLE字段