在PB中方便的实现图片动态切换
敬业的IT人
互联网
佚名
2008-1-4 11:07:15
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_3p_0.hide() //开始时图片隐藏起来p_1.hide()p_2.hide()p_3.hide()i=0timer(0.2)
在窗口的timer事件中写入如下脚本:
timer:if i $#@62;= 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_countpicture pic[]在窗口的open事件中写入如下脚本:open:int icic = upperbound(this.control)//取出窗口中所有控件的个数 p_count=0 object ctr_typefor 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 = 0timer(0.2) //设定切换时间在窗口的timer事件中写入如下脚本:timer:if i $#@62;= p_count then i = i - p_count //参数i超过累加界限时拉回至“零”int j,kfor 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() nextend ifnexti++ //参数累加进入讨论组讨论。
- 最新文章
- 在PB应用中实现声音与动画[01-04]
- 在PB打印中实现人民币大写[01-04]
- 使用PB 7.0 开发Web应用[01-04]
- 采用Sybase、PowerBuilder、Notes构建B..[01-04]
- 如何在PB中启动控制面板及其控制项[01-04]
- PowerBuilder中实现数据窗口打印预览通用方法[01-04]
- 相关文章
- 在PB中动态修改SQL语句[01-04]
- 用C++Builder6制作Apache动态服务页[01-03]
- C++BUILDER动态建立菜单及菜单事件[01-03]
- C++Builder编程中动态更改自定义打印纸张[01-03]
- BCB动态生成30个按钮对象[01-03]
- 在BCB中实现菜单资源的动态加载[01-03]
