CSDN博客

img oceanaut

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

发表于2002/5/13 9:30:00  790人阅读

分类: 数据库开发

    在PowerBuilder中函数OpenWithParmCloseWithReturnOpenSheetWithParmwindowname.OpenUserObjectWithParm等都有一个在进行窗口操作(打开或者关闭)时存入Message消息对象的参数parameterreturnvalue

消息对象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_wantparm,parmtotrans)

接着在打开窗口w_wantparmopen事件中键入:

  string ls_getparm

  ls_getparm =message.stringparm

  …

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

  方法一

  定义结构变量:lstr_declaredstr,其中包含你想传递的各种参数:

  变量名      变量类型

  ID       Unsignedlong

  Name      Character

  Email     Character

  Homepage    Character

         

  在调用脚本中,使用如下代码:

  lstr_declaredstr lstr—parmtotrans

  lstr—parmtotrans.id=1

  lstr—paramtotrans.name=panya

  lstr—paramtotrans.email=panya@163.net

  lstr—paramtotrans.homepage=http://panya.163.net

  …

  openwithparm(w_wantparm,parmtotrans)

  接下来在打开窗口w—wantparmopen事件中,获取结构信息:

  lstr—declaredstr lstr—getparm

  integer li_getid

  string ls_getname

  string ls_getemail

  string ls_gethomepage

  lstr_getparm=message.powerobjectparm

  li_getid=lstr_getparm.id

  ls_getname= lstr_getparm.name

  ls_geemail= lstr_getparm.email

  ls_gethomepage= lstr_getparm.homepage

  …

  其中ame

  String Email

  String Homepage

  ...

  打开窗口w—wantparm,并传递多个参数:

  u_n_parmtostore lnv_paramtotrans

  lnv_paramtotrans.id=1

  lnv_paramtotrans.name=panya

  lnv_paramtotrans.email=panya@163.net

  lnv_paramtotrans.homepage=http://pbnet.126.com

  …

  OpenWithParm ( w_wantparm, lnv_paramtotrans )

  在 w_wantparm open 事件中访问传来的参数:

  u_n_parmtostore lnv_getparam

  integer li_getid

  string ls_getname

  string ls_getemail

  string ls_gethomepage

  lnv_getparam = Message.PowerObjectParm

  li_getid=lnv_getparam.id

  ls_getname=lnv_getparam.name

  ls_gethomepage=lnv_getparam.homepage

  ls_getemail=lnv_getparam.email

  …

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

相关博文

我的热门文章

img
取 消
img