精华区文章阅读

发信人: cdd (平上), 信区: Database
标  题: 在PB中方便的实现图片动态切换
发信站: 哈工大紫丁香 (2000年05月28日10:18:43 星期天), 站内信件

　 PowerBuilder是一个功能十分强大的数据库开发工具，其以简便、灵活、
高效等优点博得了许多编程人员的青睐，因此在国外一出现就相当的流行，近
几年中国也随之而起。本人在使用PB开发“企业级数据库系统”已有近两年的
经验，在开发前期由于图书资料的深度不够（好多都是就简单的介绍如何操作
为止），报纸上的经验交流少得可怜，因此走了相当不少的弯路，因此想借此
文章达到一个抛砖引玉的效果，使PB编程人员们在这里能够坦诚交流各自的编
程经验，共同提高中国PB编程人员的水平。
　我们都知道在PowerBuilder开发平台中不支持JPG，GIF等图片格式，仅能显
示BMP，RLE，WMF三种图片格式（截止到PowerBuilder 6.5版本），所以要实现
图片的动态切换，必须把“动作连续”的几个图片事先作好，然后按照顺序一个个
的显示，作出的程序才会具有“电影效果”或者相当于网页上的“GIF”图片的效果
（当然通过嵌入OLE对象也可实现电影的播放，在这里本人不是指使用此方法）。
　当切换的图片比较少时，一般编程者会比较倾向于使用下面的方法，此方法
结构清晰简单，比较易懂，但灵活性差：
　以四个图片的切换为例，
　首先建立窗口的Instance 变量（实例变量）：
integer i
　在一个新建窗口的open事件中写入如下脚本：
open:
//建立四个“图片对象”的名称分别为：p_0，p_1，p_2，p_3
p_0.hide() //开始时图片隐藏起来
p_1.hide()
p_2.hide()
p_3.hide()
i=0
timer(0.2)
　在窗口的timer事件中写入如下脚本：
timer：
if i >= 4 then i = i – 4 //当参数i累加超过界限时拉回
choose case mod(i,4)
case 0
p_0.show()
p_1.hide()
p_2.hide()
p_3.hide()
case 1
p_0.hide()
p_1.show()
p_2.hide()
p_3.hide()
case 2
p_0.hide()
p_1.hide()
p_2.show()
p_3.hide()
case 3
p_0.hide()
p_1.hide()
p_2.hide()
p_3.show()
end choose
i++
　对于PowerBuilder熟练编程的人来说，可以看出以上程序脚本通用性不
会很强，即当我们需要再添加几个切换的图片时，需要改动的地方太多：Case
语句的“情况个数”要随图片的增加而增加，而且每个Case 语句中又需增添
诸如p_5.show(),p_5.hide() 的程序，参数i的“累加上限”需要更改，造
成程序的维护量大大增加。
　本人在PowerBuilder的使用过程中针对此情况研究了一些小的技巧，对上面
的程序脚本进行的适当的完善、改进，编程人员只需遵循简单的规则而无须改动
程序脚本，即可满足上面“连续图片个数增/减”的要求：遵循规则：需要显示图
片对象的命名顺序与切换显示顺序要一致，必须为：p_0,p_1,p_2,p_3.....不
需要切换（即静止图片）的命名中不要夹杂“数字”。
　在窗口的Instance中定义如下变量：
integer i,p_count
picture pic[]
在窗口的open事件中写入如下脚本：
open:
int ic
ic = upperbound(this.control)//取出窗口中所有控件的个数
p_count=0
object ctr_type
for i = 1 to ic
ctr_type = this.control[i].typeof()
choose case ctr_type
case picture! //过滤图片控件
//以下过滤图片控件中需要切换的图片并保存在一数组中
if Match(mid(this.control[i].classname(),3),"[0-9]") then
p_count++ //累计需要切换图片的个数
this.control[i].hide()
pic[p_count] = this.control[i]
end if
end choose
next
i = 0
timer(0.2) //设定切换时间
在窗口的timer事件中写入如下脚本：
timer：
if i >= p_count then i = i - p_count
//参数i超过累加界限时拉回至“零”
int j,k
for j = 1 to p_count
if pic[j].classname() = "p_" + string(mod(i,p_count)) then
//筛选出需要显示的图片
pic[j].show()
for k = 1 to p_count //不显示未轮到的图片
if k = j then continue //越过轮到显示的图片
pic[k].hide()
next
end if
next
i++ //参数累加
　同时本人欢迎PB方面的高手到报纸上或通过书信、电子邮件的形式来互相
切磋编程经验，内容可以是关于类库和框架包的建设，软件工程在PB方面的实
施等，本人很愿意与大家共同分享编程的快乐！

--

                        ●●●●●●       　●� �
                           ★●★            ●
                        ●●●●●●         ●★★
                             ●              ●

※ 来源:·哈工大紫丁香 bbs.hit.edu.cn·[FROM: che.hit.edu.cn]

Database 版 (精华区)