请问如何在access数据表存储图像? 在access中好象没有什么Blob类型的字段,只有一个[OLE 对象]的字段类型有点象,但是又不会用,不知道在delphi里该如何将图像存储倒access数据表中!恳请各位能不吝赐教!谢谢! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 用ole跟用blob类型一样存取 存到数据库varpjpg:tjpegimage;pic:TMemoryStream;beginpjpg:=tjpegimage.Create;pjpg.LoadFromFile(F:\JPG.jpg);pic:=TMemoryStream.Create;pjpg.SaveToStream(pic);pic.Position:=0;TBlobField(dataset.FieldByName('Img')).LoadFromStream(pic);dataset.post;pic.Free;pjpg.free;end;从数据库取出varpjpg:tjpegimage;pic:TMemoryStream;beginpjpg:=tjpegimage.Create;pic:=TMemoryStream.Create;TBlobField(dataset.FieldByName('Img')).savetoStream(pic);pic.positon:=0;pjpeg.LoadFromStream(pic);image.graphi.bmp.assign(pjpeg);end;end; 非常谢谢大家,不过好象我有DBImage控件绑定到相应的数据字段时,图像还是不能显示,总是弹出“Bitmap image is not valid.”的错误提示,在Access中字段的类型我选的是[OLE 对象],不知道是什么地方错了! 这说明不支持该格式,DBImage不支持JPG,支持BMP jpg存入数据库不用转换成流形式,读出时则需要,并且只能用image显示,dbimage不行 你有这样的控件? 刚入行,多指教 BDE与syabse的发布以及水晶报表10的发布 BDE+ORACLE,TQuery的RequestLive不能设为True? 怎样用mscomm控件向端口发送一个字节? 如何在DLL中创建MDI子窗体 如何用Delphi编写程序上传图片数据到Internet数据库? WORD文件被破坏,如何恢复?? 我的InstallShield Cabinet File Viewer,为什么没有new菜单选项? 简单问题,送分喽! 急需需求分析的模板! 怎样算日期
用ole跟用blob类型一样存取
存到数据库
var
pjpg:tjpegimage;
pic:TMemoryStream;
begin
pjpg:=tjpegimage.Create;
pjpg.LoadFromFile(F:\JPG.jpg);
pic:=TMemoryStream.Create;
pjpg.SaveToStream(pic);
pic.Position:=0;
TBlobField(dataset.FieldByName('Img')).LoadFromStream(pic);
dataset.post;
pic.Free;
pjpg.free;
end;
从数据库取出
var
pjpg:tjpegimage;
pic:TMemoryStream;
begin
pjpg:=tjpegimage.Create;
pic:=TMemoryStream.Create;
TBlobField(dataset.FieldByName('Img')).savetoStream(pic);
pic.positon:=0;
pjpeg.LoadFromStream(pic);
image.graphi.bmp.assign(pjpeg);
end;end;