ehxz 发表于 2009-3-20 09:44:09

PB窗口之间传递多参数的方法

在PowerBuilder中函数OpenWithParm,CloseWithReturn,OpenSheetWithParm,windowname.OpenUserObjectWithParm 等都有一个在进行窗口操作(打开或者关闭)时存入Message消息对象的参数parameter或returnvalue。
消息对象Message有三个属性用于存储这些函数传递给窗口的数据(依赖于窗口操作时参数赋予的类型)。
根据parameter   /   returnvalue参数数据类型的不同,该参数的值保存在Message对象的不同属性中。
parameter   /   returnvalue参数的类型与使用的Message对象属性的对应关系如下表:


参数类                                                                                     Message对象属性   

Numeric(数值)                                                                           Message.DoubleParm   

PowerObject(PB对象,包括用户自定义的结构数据类型)   Message.PowerObjectParm   

String(字符串)                                                                         Message.StringParm   


应用程序根据OpenWithParm()等函数的parameter   /   returnvalue参数类型,从Message消息对象的不同属性中提取该函数并传送

给被打开窗口的值。

在PB中如果是传递一个参数,是很容易实现的。在调用脚本中,可以使用如下代码:
openwithparm(w_1,"独孤求败")
接着在打开窗口w_1的open事件中键入:
sle_1.Text   =   message.stringparm

如果需要传递多个参数,可以使用如下两种方法:
方法一

定义结构变量:lstr_para,其中包含你想传递的各种参数:
变量名      变量类型
ID      string
Name          string
Sex            string
Loca            string

在调用脚本中(本例使用才菜单clicked中),使用如下代码:

lstr_para   lstr_Tranpara
lstr_Tranpara.id       =   "00000001"
lstr_Tranpara.name   =   "独孤求败"
lstr_Tranpara.sex   =   "男"
lstr_Tranpara.loca   =   "广东深圳"

openwithparm(w_2,lstr_Tranpara)

接下来在打开窗口w_2的open事件中,获取结构信息:
lstr_para   lstr_Getpara
lstr_Getpara   =   message.powerobjectparm
sle_1.Text       =   lstr_Getpara.id
sle_2.Text       =   lstr_Getpara.name
sle_3.Text       =   lstr_Getpara.sex
sle_4.Text       =   lstr_Getpara.loca

其中,lstr_Getpara为用户自定义结构数据类型,是值传送的。

方法二

首先创建一个类用户对象
uo_para
在该用户对象中将你需要传递的各种参数申明成实例变量,例如:
public:
      string   id
      string   name
      string   sex
      string   loca
在调用脚本中(本例使用才菜单clicked中),使用如下代码:
uo_para   uo_Tranpara
uo_Tranpara   =   create   uo_para
uo_Tranpara.id       =   "00000001"
uo_Tranpara.name   =   "独孤求败"
uo_Tranpara.sex   =   "男"
uo_Tranpara.loca   =   "广东深圳"
OpenWithParm(w_3,uo_Tranpara)

接下来在打开窗口w_3的open事件中,获取用户对象信息:
uo_para   uo_Getpara
uo_Getpara   =   message.powerobjectparm
sle_1.Text       =   uo_Getpara.id
sle_2.Text       =   uo_Getpara.name
sle_3.Text       =   uo_Getpara.sex
sle_4.Text       =   uo_Getpara.loca

以上两种方法比较而言,第一种方法虽然比较简单实用,但是如果遇上较复杂的数据时,便不能在一个结构数据中充分描述了;
第二种方法不但方便灵活,而且可以传送复杂的数据。当然,参数的传送不止以上的几种方法,你也可以使用全局变量或是公共可
访问的窗口实例变量来传送参数,或者在窗口中调用一个函数,并传递所需的参数,在此就不再赘述了。

另外,用Message传递参数必须注意以下几点:

1.   最好执行完窗口操作(打开或关闭)后马上将Message消息对象的值传给变量,这是因为Message是全局使用的对象, 每一次事件被触发或传送时都会被使用,其他Script   也有可能用到Message消息对象,因此它有被覆盖的危险。


2.避免传送NULL对象,以免程序出错。

chdlxm 发表于 2009-4-2 08:05:53

非常好的帖子,非常感谢,收藏

JohnPhan 发表于 2009-4-2 13:53:27

直接用 窗口实例变量 简洁、方便。

ribut9225 发表于 2009-4-13 20:59:00

谢谢楼主分享
页: [1]
查看完整版本: PB窗口之间传递多参数的方法

免责声明:
本站所发布的一切破解补丁、注册机和注册信息及软件的解密分析文章仅限用于学习和研究目的;不得将上述内容用于商业或者非法用途,否则,一切后果请用户自负。本站信息来自网络,版权争议与本站无关。您必须在下载后的24个小时之内,从您的电脑中彻底删除上述内容。如果您喜欢该程序,请支持正版软件,购买注册,得到更好的正版服务。如有侵权请邮件与我们联系处理。

Mail To:Admin@SybaseBbs.com