不看会后悔的Windows XP之经验谈	简单快捷DIY实用家庭影院

数据窗口显示图片的问题，问题解决马上结贴（分不够可以再加）!

楼主lincanwen（密码错误）2002-08-01 08:37:45 在 PowerBuilder / 基础类提问

我想数据窗口的第一列显示图片，第二列以后显示信息(如下图),各位有什么好的方法吗？谢谢各位了！
______________________________________________________________
| 图片 | 名称 | 编号 | 备注 |
--------------------------------------------------------------
| 图片内容a | 名称a | 1 | 无 |
--------------------------------------------------------------
| 图片内容b | 名称b | 2 | 无 |
--------------------------------------------------------------
| 图片内容c | 名称x | 3 | 无 |
--------------------------------------------------------------
.....
问题点数：100、回复次数：24Top

1 楼myclife（反方向的钟）回复于 2002-08-01 08:44:33 得分 5

用BLOB存放于数据库中！Top

2 楼lincanwen（密码错误）回复于 2002-08-01 09:05:35 得分 0

我在数据库表中已经有一个图象类型的字段啊！Top

3 楼HJZ2970（None）回复于 2002-08-01 09:14:38 得分 5

Object ->OLE Database BlobTop

4 楼lincanwen（密码错误）回复于 2002-08-01 09:22:19 得分 0

to HJZ2970(None):
能不能说具体点啊！Top

5 楼zzz1975（大葱炒肉，也就是葱爆肉）回复于 2002-08-01 16:05:23 得分 5

打开导入
li = getfileopenname("",pic_path,pic_name,"bmp","BitMapfiles(*.bmp),*.bmp")
f_len = filelength(pic_path)

库中定义一个blob类型的字段
插入即
应该是保存的图片的地址，对库的影响不是很大！！Top

6 楼macro_fu（）回复于 2002-08-01 16:11:08 得分 5

GetFileOpenName("选择图片文件", &
is_pathname,is_filename, "JPG", &
+ "JPG Files (*.JPG),*.JPG," &
+ "BMP Files (*.BMP),*.BMP," &
+ "GIF Files (*.GIF),*.GIF," &
+ "ALL Files (*.*),*.*")
dw_1.object.p_1.filename = is_pathname
Top

7 楼jeking（苦命人）回复于 2002-08-01 16:14:07 得分 5

图片放到数据库中去！Top

8 楼lincanwen（密码错误）回复于 2002-08-01 19:40:00 得分 0

各位，我已经把图片存到数据库了，现在想要打印出来啊，该怎么办啊！？Top

9 楼shahand（死磕）回复于 2002-08-01 20:06:25 得分 5

直接用数据窗口print啊Top

10 楼wxhacker（为了。。。）回复于 2002-08-01 20:24:41 得分 5

数据窗口对象的问题！

Top

11 楼super_jack（String args[]）回复于 2002-08-02 09:39:07 得分 5

你能把图片放到DW中，就可以打印了Top

12 楼jeking（苦命人）回复于 2002-08-02 09:49:24 得分 5

通过datawindow把图片拿出来啊。Top

13 楼nhgw（创新！）回复于 2002-08-02 09:50:23 得分 5

不是有一个属性display as picture吗。选取不就行了。Top

14 楼lincanwen（密码错误）回复于 2002-08-02 17:21:25 得分 0

问题是现在不知怎样把图片放在数据窗口啊！Top

15 楼msf（飞黄腾达）回复于 2002-08-02 17:38:56 得分 5

你可以不把图片放到字段中。用DISPASPICTURE
之后这个字段存放这个图片的路径。一切OK
我以前做过类似的软件。一个政府部门的。不知是否对你有帮助。Top

16 楼xiaobzg（小兵张嘎）回复于 2002-08-02 17:42:40 得分 5

存取图片路径，图片字段使用displayaspictureTop

17 楼emoam（十一狼）回复于 2002-08-02 17:48:04 得分 10

用pictuer控件将图片取出来，然后再设置打印就可以了。

函数：f_loadphoto_fromdb(id)

BLOB blb_Photo
long ll_RtnCode

SELECTBLOB TX INTO :blb_photo //TX就是图像字段
FROM ZDRK_TX //表名哦
WHERE ID = :id AND SEQNO = :ll_seqno //条件语句啦
USING sqlca;

//判断读取是否成功

ll_RtnCode = sqlca.sqlcode
CHOOSE CASE ll_RtnCode
CASE -1
SetNull(blb_Photo)
CASE 100
SetNull(blb_Photo)
END CHOOSE
RETURN blb_Photo

p_1.Picturename = ''
p_1.setPicture(blb_photo)
图片就取出来了，放置在p_1中，要打印什么的该很容易处理了。

Top

18 楼lkxhappy（第二梦）回复于 2002-08-02 19:44:46 得分 5

关注~~~Top

19 楼lincanwen（密码错误）回复于 2002-08-02 20:05:00 得分 0

to emoam(阿漠am) :
这样只能读一条记录啊，不能象我楼顶上设计的那种效果啊！Top

20 楼tiantianpb（第一菜鸟！）回复于 2002-08-02 20:14:08 得分 5

Object ->OLE Database Blob
具体如何操作，建议看看helpTop

21 楼jiankicsdn（）回复于 2002-08-02 20:20:46 得分 5

你个大笨笨：不是有一个字段吗？Top

22 楼yslong（杨）回复于 2002-08-02 20:41:51 得分 5

好办，如下：
1、在该数据窗口中加入一个图片控件p_1
2、给该控件付值:dw_1.object.p_1.filename = 图片的文件名(含路径)
3、打印该数据窗口dw_1.print(true)
绝对OK！
Top

23 楼qlqllu（一张）回复于 2002-08-02 22:23:10 得分 5

如果库中存的是图片，建议用selectblob去出图片写到一个临时文件中，然后再写到把数据写到datawindow中的ole控件中，用blob列速度太慢
如果库中存的是文件名，那就好办了：用pictureTop

24 楼lne818（满天星）回复于 2002-08-02 23:48:51 得分 5

可以利用ole进行操作，得到的数据是bolb类型，存储例用updatebolb，取出例用selectbolb，
integer k
long row,dzxh,n
string dzbh
row=dw_dz.getrow()
dzbh=dw_dz.getitemstring(row,"dzbh")
dzxh=dw_dz.getitemnumber(row,"dzxh")
//if isnull(dzbh) then
//messagebox("提示!","必须先输入读者编号后才能加入读者照片")
//return
//end if
if xh<0 then
messagebox("提示!","你必须在加入完读者信息并保存后才能加入读者照片")
return
end if
k=uo_f.f_readfile(da,"打开","bmp","bmp文件(*.bmp),*.bmp,jpg文件(*.jpg),*.jpg,gif文件(*.gif),*.gif")
string ss,syn

if k<0 and isnull(p_1) then
st_1.visible=true
return
end if
uo_dzb.settp(da,dzbh)
st_1.visible=false

UPDATEblob DZB
SET dzzp = :data
where dzbh=:dzbh;

Top