如何把图片文件写到数据库的image字段中。 我想把图片文件写到数据库的image字段(数据类型是image类型)中。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 参数说明:img:你要显示图片的image。adoq:数据集。field:包含图片的字段。procedure savepicture(img: Timage; ADOQ: TADOQuery; field: string);var photo: Tmemorystream;begin photo := Tmemorystream.create; img.Picture.graphic.savetoStream(photo); Tblobfield(ADOQ.FieldByName(field)).loadfromstream(photo); photo.Clear;end; 也可参考:http://expert.csdn.net/Expert/topic/1226/1226344.xml?temp=8.094424E-02 自定义事件传的参数出现乱码 Delphi socket两个局域网之间通讯问题 怎样用Delphi在IIS中新建一个站点 ActiveX控件的问题? [原创]我创建了一个QQ群,希望大家进来交流程序设计问题2800568 工程硕士成绩出来了,考得不好,散分 虽然我离开公司,但还是帮公司一把,求如下人才 一个关于WIN98关机效果的问题?您感兴趣吗?您知道吗?进来说说看。。 类没有注册问题如何解决? 关于数据库的时间查询问题 正在做POS系统,哪个有软件给个参考参考 在线等待!关于select的问题
img:你要显示图片的image。
adoq:数据集。
field:包含图片的字段。procedure savepicture(img: Timage; ADOQ: TADOQuery; field: string);
var photo: Tmemorystream;
begin
photo := Tmemorystream.create;
img.Picture.graphic.savetoStream(photo);
Tblobfield(ADOQ.FieldByName(field)).loadfromstream(photo);
photo.Clear;
end;