怎样在access中存取图片的路径,再用代码读出,用dbimage显示出来。
我需要详细点的代码!
我还在做毕业设计
我需要详细点的代码!
我还在做毕业设计
解决方案 »
- The future of Delphi looks brighter than ever before!!!
- delphi 如何屏蔽ctrl+c的复制功能
- fastreport3.0 简单问题,为什么第一条记录显示不出来?
- 判断光驱中是否放有光盘
- 2000分大放送之<五>!向明日到访的古巴领袖菲德尔·卡斯特罗致敬!
- 用DELPHI可以和BCB写的程序连接再一起吗?
- Win2K下的Api函数的拦截
- 初级问题
- 在Delphi里如何快速插入几个相同的部件呢?
- 请问,在delphi编程中如何用odbc连接excel?
- 一个串,长度为1到20,怎么判断该串由同一字符组成
- 在针式打印机中如何通过编程控制打印机的进纸和退纸
uses jpeg;
.......var v_path:string;
v_photo:TJPEGImage;
begin
v_path:='路徑';
v_photo:=TJPEGImage.Create;
v_photo.LoadFromFile(v_path);
table1.edit;
table1.FieldByName('path').Value:=v_path;//path為路徑字段
table1.FieldByName('photo').Assign(v_photo);//photo為圖片字段
table1.Post;
end;
給你點思路
我得意思只存路径,通过dbimage读取
begin
v_path:=table1.FieldByName('path').Value;
v_photo:=TJPEGImage.Create;
v_photo.LoadFromFile(v_path);
DBImage1.Picture.Assign(v_photo);
end;
not valid”,是不是一顶要把图片先转换成BMP格式才能向数据库中存取了,还有其他的方法吗?
MS: TMemoryStream;
begin
MS:=TMemoryStream.create;
Image1.Picture.Bitmap.SaveToStream(MS);
MS.Position:=0;
Table1.Append;
file://在数据库中添加一条记录
TBlobField(Table1.FieldbyName
('image')).LoadFromStream(MS);
Table1.Post;
file://将所作的更新写入数据库
end;
上面是用blob类型(二进制流)的字段向数据库中存图片。
将dbimage的datasource设置好后, 将datafield设为image就可以了, 只是个例子,应该能有点帮助。