如何在数据库中插入图象(50分)

  • 主题发起人 主题发起人 树熊132
  • 开始时间 开始时间

树熊132

Unregistered / Unconfirmed
GUEST, unregistred user!
如何在数据库中插入图象,以及修改图象,包括gif
 
解答者加分
 
树袋熊
用blob字段,可以fieldbyname('xx').assign(image1)
 
得看看你的数据库是什么,bmp,jpeg 好做,gif不好做,
最好的,最常用的方法是流。
 
用二进制流吧
 
你可以参考一下http://www.delphibbs.com/delphibbs/dispq.asp?lid=340833
把里头有关jpeg的换成gif就可以
 
下面的代码是把图片在装入dbimage 中 并修改他的大小
(ExtractFileExt(opendialog.filename)='.JPG') then
begin
ajpeg:=Tjpegimage.Create ;
ajpeg.PixelFormat :=jf24Bit;
ajpeg.LoadFromFile(opendialog.filename);
if ajpeg.Width >dbimager1.Width then
begin
bmp2:=Tbitmap.Create ;
bmp2.Assign(ajpeg); //把jpeg 图像转入bmp中
bmp:=Tbitmap.Create ;
bmp.Width :=round(bmp2.Width/1.2);
bmp.Height :=round(bmp2.Height/1.2); //1.2是你想改变的比例
StretchBlt(bmp.Canvas.Handle,0,0,bmp.Width,bmp.Height,bmp2.Canvas.Handle,0,0,bmp2.Width,bmp2.Height,SRCCOPY);
ajpeg.Assign(bmp); //栽入
dbimager1.Picture.bitmap.assign(ajpeg); //show
bmp2.Free;
bmp.Free;
 
你没有告诉具体的数据库, 这问题有点模糊?

不过现在的多种数据库管理系统都直接支持图象或者其他对象,例如位图、各种OLE对象。
不必挖空心思另外编程的。
如果使用SQL Sever、Access、VFP等,可以直接在建库时将某一字段指定为Image或者OLE
数据类型。
然后将Table组件或者其他数据库访问组件的对应字段与DBImage组件捆绑。这样就可以
使用图象字段了。
其实,Delphi5、6 的DEMO文件夹内就有现成的示例,你不妨先看一看。
希望对你有帮助。
 
呵呵。 代鱼和树熊。你俩的名字很般配啊。 代数。袋鼠。 袋熊
鱼与熊掌不可兼得.
说正题: tokey的解答很完全了.
 
有个链接
http://www.delphibbs.com/delphibbs/dispq.asp?lid=730756
 
后退
顶部