在线求助!!!ODBC怎么读取和写入Paradox的Blob大对象字段? 在线求助!!!ODBC怎么读取和写入Paradox的Blob大对象字段?Paradox这个数据库这他妈的费神啊!!! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 最简单的方法,如果BOLB对象是图片的话,用data controls下的dbimage控件用loadpickage方法就可以读图片进来了,再用table的post方法就行了 使用ado,再用流操作。可参考下列方法:var str: TADOBlobStream; begin ls_sql:='select * from tbDocument where id='+IntToStr(integer(Item.Data)); ADODoc.Close; ADODoc.SQL.Clear; ADODoc.SQL.Add(ls_sql); ADODoc.Open; ADODoc.Edit; str:=TADOBlobStream.Create(Tblobfield(ADODoc.FieldByName('content')),bmRead); str.Position:=0; //锁定画面避免闪烁 LockwindowUpdate(OleContainer1.Handle); LockwindowUpdate(Listview1.Handle); OleContainer1.DestroyObject; OleContainer1.LoadFromStream(TStream(str)); ..... OleContainer1.DoVerb(-1); ..... 必须使用TADOBlobStream Access violation at address 4DD4186B in module 'msado15.dll'错误,急 继续显示mdichild关闭前的大小 DbgridEh 如何实现每页打印标题,我用的是QuickRep。高分请都高手。 一个关于DBGRID的问题? 寻求图像的例子! 如何加载动画光标 ado连接access2000(带密码)的方法! 斑竹:自己的贴子怎么样才能删除?我提的问题有好多都自己解决了 怎样使文本文件中太长的行分成几行? 数据表字段被意外的修改 ClientDataSet保存的时候出现错误!!!各位朋友请帮助?
可参考下列方法:
var
str: TADOBlobStream;
begin
ls_sql:='select * from tbDocument where id='+IntToStr(integer(Item.Data));
ADODoc.Close;
ADODoc.SQL.Clear;
ADODoc.SQL.Add(ls_sql);
ADODoc.Open;
ADODoc.Edit;
str:=TADOBlobStream.Create(Tblobfield(ADODoc.FieldByName('content')),bmRead);
str.Position:=0;
//锁定画面避免闪烁
LockwindowUpdate(OleContainer1.Handle);
LockwindowUpdate(Listview1.Handle);
OleContainer1.DestroyObject;
OleContainer1.LoadFromStream(TStream(str));
.....
OleContainer1.DoVerb(-1);
..... 必须使用TADOBlobStream