循序渐进学习Power Builder 6.0(11-2)
系统将会提示我们保存这个结构,选择“是”按钮,给结构取一个名字,定义结构的工作就完成了。如图11-9。
图11-9
如何在程序中使用这个结构呢?一个结构就是一个新的数据类型,在使用之前必须实例化。这句脚本的意思就是生成一个结构的实例。
strucPictureName name
我们可以使用点操作符给结构的变量赋值。
name.pic1 = "1.bmp"
name.pic2 = "2.bmp"
name.pic3 = "3.bmp"
name.pic4 = "4.bmp"
name.pic5 = "5.bmp"
name.pic6 = "6.bmp"
name.pic7 = "7.bmp"
这段脚本的意思是根据全局变量的值从结构变量当中取出合适的值来改变图片控件的属性。
CHOOSE CASE picnum
case 1
this.picturename = "1.bmp"
case 2
this.picturename = "2.bmp"
case 3
this.picturename = "3.bmp"
case 4
this.picturename = "4.bmp"
case 5
this.picturename = "5.bmp"
case 6
this.picturename = "6.bmp"
case 7
this.picturename = "7.bmp"
END CHOOSE
单击POWER BAR上面的RETURN按钮,关闭工作区。关闭用户对象定义工作区。单击“是”按钮确认保存这个用户对象,为这个对象取名字。单击OK按钮。如图11-10。
图11-10
接下来,打开一个窗口,单击控件布置按钮,弹出控件列表,单击USER OBJECT按钮,系统弹出用户对象选择对话框,在列表中选择刚才定义的控件,选择然后在窗口上单击鼠标左键,布置这个控件。
如图11-11。
图11-11
在窗口上面单击鼠标右键,弹出菜单,选择SCRIPT命令。在事件选择列表当中选择OPEN事件,在其中加入一段代码。
Timer(0.5)
它的意思是在窗口打开的时候,设置该窗口的定时器触发时间间隔为半秒钟。设置然后选择窗口的TIMER定时器触发事件。加入这样的代码。
p_1.TriggerEvent("alterpic")
它的意思是当定时器计时已满事件触发的时候,程序触发我们刚才定义的用户事件。
这样就完成了窗口和用户对象的接口定义。关闭脚本画板工作区。关闭窗口画板工作区。
从上面的例子当中,可以看出使用用户对象的便利之处。