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

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

《PB窗口之间传递多参数的方法.docx》由会员分享，可在线阅读，更多相关《PB窗口之间传递多参数的方法.docx（7页珍藏版）》请在冰豆网上搜索。

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

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

（深圳：

独孤求败 2003-05-19）

    在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_wantparm,parmtotrans）

　　接着在打开窗口w_wantparm的open事件中键入：

　　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@"

　　lstr_paramtotrans.homepage="

";

　　…

　　openwithparm（w_wantparm,parmtotrans）

　　接下来在打开窗口w_wantparm的open事件中，获取结构信息：

　　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

　　…

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

　　方法二

　　首先创建一个类用户对象

　　u_n_parmtostore

　　在该用户对象中将你需要传递的各种参数申明成实例变量，例如：

　　Public:

　　Integer ID

　　String Name

　　String Email

　　String Homepage

　　...

　　打开窗口w_wantparm，并传递多个参数：

　　u_n_parmtostore lnv_paramtotrans

　　lnv_paramtotrans.id=1

　　lnv_paramtotrans.name="panya"

　　lnv_paramtotrans.email="panya@"

　　lnv_paramtotrans.homepage="

";

　　…

　　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

　　…

　　以上两种方法比较而言，第一种方法虽然比较简单实用，但是如果遇上较复杂的数据时，便不能在一个结构数据中充分描述了；第二种方法不但方便灵活，而且可以传送复杂的数据。

当然，参数的传送不止以上的几种方法，你也可以使用全局变量或是公共可访问的窗口实例变量来传送参数，或者在窗口中调用一个函数，并传递所需的参数，在此就不再赘述了。

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

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

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

Close（）

功能关闭窗口并释放窗口以及窗口上的控件所占据的内存。

语法Close（windowname）

参数windowname：

要关闭窗口的名称返回值Integer。

函数执行成功时返回1，发生错误时返回-1。

如果参数windowname的值为NULL，Close（）函数返回NULL。

用法应用程序使用Open（）或其它Open簇函数打开窗口后，不需要窗口时，可以使用Close（）关闭窗口并释放窗口以及窗口上所有控件占据的内存。

Close（）函数的执行过程为：

如果要关闭窗口的CloseQuery和/或Close事件已经编写了事件处理程序，那么执行这些事件处理程序，从屏幕上删除要关闭的窗口、关闭窗口、之后执行调用Close（）函数语句后面的语句。

当窗口被关闭后，应用程序就不能再访问已经关闭窗口的属性、实例变量、对象函数、以及窗口上的控件了。

如果关闭窗口后应用程序依然访问上述特性，那么将引发运行错误。

当然，应用程序也可以阻止窗口被关闭，方法很简单，只要在欲阻止关闭窗口的CloseQuery事件处理程序中使用RETURN语句返回1即可，格式为：

RETURN1

--------------------------------------------------------------------------------

CloseWithReturn（）

功能关闭窗口并将返回值保存在Message对象中，该函数只能对响应窗口使用。

语法CloseWithReturn（windowname,returnvalue）

参数windowname：

要关闭窗口的名称returnvalue：

指定关闭窗口时保存到Message对象中的值，调用CloseWithReturn（）函数的代码段通过查看Message对象属性的值得到关闭窗口时被关闭窗口传递的值。

returnvalue参数必须是下述三种类型之一：

String、Numeric、PowerObject返回值Integer。

函数执行成功时返回1，发生错误时返回-1。

如果参数任何的值为NULL，CloseWithReturn（）函数返回NULL。

--------------------------------------------------------------------------------

Open（）

功能打开窗口。

该函数有两种语法格式：

语法一、打开编程时已知数据类型的窗口对象；

语法二、打开程序运行后才能确定数据类型的窗口对象。

下面分别予以介绍：

语法一、打开编程时已知数据类型的窗口对象

语法Open（windowvar{,parent}）

参数windowvar：

要打开窗口的窗口名，可以使用窗口画笔定义的窗口对象名，也可以使用该窗口对象的某个变量。

Open（）函数把打开窗口的引用放置到windowvar变量中parent：

可选项，指定要打开窗口的父窗口，要打开窗口成为父窗口的子窗口，只有当要打开窗口需要成为某个窗口的子窗口时才需要指定该参数。

如果应用程序使用Open（）函数打开某个子窗口或弹出窗口而又省略了该参数，那么当前活动窗口成为被打开窗口的父窗口返回值Integer。

函数执行成功时返回1，发生错误时返回-1。

如果任何参数的值为NULL，Open（）函数返回NULL。

语法二、打开程序运行后才能确定数据类型的窗口对象

语法Open（windowvar,windowtype{,parent}）

参数windowvar：

指定窗口变量名，Open（）函数把打开窗口的引用放置到该变量中windowtype：

string类型，指定要打开窗口的数据类型，该参数指定的窗口数据类型必须与windowvar参数的类型相同或是windowvar类型的后继对象parent：

可选项，指定要打开窗口的父窗口，要打开窗口成为父窗口的子窗口，只有当要打开窗口需要成为某个窗口的子窗口时才需要指定该参数。

如果应用程序使用Open（）函数打开某个子窗口或弹出窗口而又省略了该参数，那么当前活动窗口成为被打开窗口的父窗口返回值Integer。

函数执行成功时返回1，发生错误时返回-1。

如果任何参数的值为NULL，Open（）函数返回NULL。

--------------------------------------------------------------------------------

OpenSheet（）

功能在MDI框架窗口中打开MDI子窗口，并在指定菜单中创建选择该子窗口的菜单项。

语法OpenSheet（sheetrefvar{,windowtype},mdiframe{,position{,arrangeopen}}）

参数sheetrefvar：

指定要作为工作表打开的窗口名windowtype：

string类型，可选项，指定要打开窗口的类型（也就是窗口画笔中保存的窗口对象名）mdiframe：

指定要放置工作表的MDI框架窗口名position：

可选参数，指定所打开的工作表的名称作为一个菜单项显示在第几个菜单标题下面，缺省时，被放在倒数第二个菜单标题下，原因是，大多数商业软件的最后两个菜单标题是Window和Help，把工作表的名称放到Window菜单标题中用于选择工作表窗口是个合情合理的选择arrangeopen：

ArrangeOpen枚举类型，可选参数，但如果选用了此参数，那么position参数也必须同时指定。

arrangeopen参数告诉系统如何显示打开的工作表返回值Integer。

函数执行成功时返回1，发生错误时返回-1。

如果参数任何的值为NULL，OpenSheet（）函数返回NULL。

用法arrangeopen参数的可能取值为：

Cascaded!

把一个工作表放在另一个的上面，每个都向右下方偏移一点，这样所有工作表的标题栏用户都能看到。

该值是OpenSheet（）函数的缺省选择。

Layered!

将工作表显示在客户区的左上角，并最大化工作表，使其充满MDI框架窗口的整个客户区。

Original!

操作动作与Cascaded!

参数相同，只是不放大窗口，而以窗口定义时的大小显示。

--------------------------------------------------------------------------------

OpenSheetWithParm（）

功能在MDI框架窗口中打开MDI子窗口，同时把参数保存在Message对象中进行传递。

语法OpenSheetWithParm（sheetrefvar,parameter{,windowtype},mdiframe{,position{,arrangeopen}}

参数sheetrefvar：

指定要作为工作表打开的窗口名parameter：

指定要传递给打开工作表的数据，该数据保存在Message对象的属性中，parameter参数的数据类型必须是下述三种类型之一：

String、Numeric、PowerObjectwindowtype：

string类型，可选项，指定是要打开窗口的类型（也就是窗口画笔中保存的窗口对象名）mdiframe：

指定要放置工作表的MDI框架窗口名position：

可选参数，指定所打开的工作表的名称作为一个菜单项显示在第几个菜单标题下面，缺省时，被放在倒数第二个菜单标题下，原因是，大多数商业软件的最后两个菜单标题是Window和Help，把工作表的名称放到Window菜单标题中用于选择工作表窗口是个合情合理的选择arrangeopen：

ArrangeOpen枚举类型，可选参数，但如果选用了此参数，那么position参数也必须同时指定。

arrangeopen参数告诉系统如何显示打开的工作表返回值Integer。

函数执行成功时返回1，发生错误时返回-1。

如果参数任何的值为NULL，OpenSheet（）函数返回NULL。

用法arrangeopen参数的可能取值为：

Cascaded!

把一个工作表放在另一个的上面，每个都向右下方偏移一点，这样所有工作表的标题栏用户都能看到。

该值是OpenSheet（）函数的缺省选择。

Layered!

将工作表显示在客户区的左上角，并最大化工作表，使其充满MDI框架窗口的整个客户区。

Original!

操作动作与Cascaded!

参数相同，只是不放大窗口，而以窗口定义时的大小显示。

--------------------------------------------------------------------------------

OpenWithParm（）

功能带参数打开窗口，与打开窗口的Open（）函数相似，OpenWithParm（）有两种语法格式：

语法一、带参数打开编程时已知数据类型的窗口对象；

语法二、带参数打开程序运行后才能确定数据类型的窗口对象。

下面分别予以介绍：

语法一、带参数打开编程时已知数据类型的窗口对象

语法OpenWithParm（windowvar,parameter{,parent}）

参数windowvar：

要打开窗口的窗口名，可以使用窗口画笔定义的窗口对象名，也可以使用该窗口对象的某个变量。

Open（）函数把打开窗口的引用放置到windowvar变量中parameter：

指定要传递给打开窗口的数据，该数据保存在Message对象的属性中，parameter参数的数据类型必须是下述三种类型之一：

String、Numeric、PowerObjectparent：

可选项，指定要打开窗口的父窗口，要打开窗口成为父窗口的子窗口，只有当要打开窗口需要成为某个窗口的子窗口时才需要指定该参数。

如果应用程序使用Open（）函数打开某个子窗口或弹出窗口而又省略了该参数，那么当前活动窗口成为被打开窗口的父窗口返回值Integer。

函数执行成功时返回1，发生错误时返回-1。

如果任何参数的值为NULL，OpenWithParm（）函数返回NULL。

用法消息对象Message有三个属性用于存储OpenWithParm（）函数传递给打开窗口的数据。

根据parameter参数数据类型的不同，该参数的值保存在Message对象的不同属性中。

语法二、带参数打开程序运行后才能确定数据类型的窗口对象

语法OpenWithParm（windowvar,parameter,windowtype{,parent}）

参数windowvar：

指定窗口变量名，Open（）函数把打开窗口的引用放置到该变量中parameter：

指定要传递给打开窗口的数据，该数据保存在Message对象的属性中，parameter参数的数据类型必须是下述三种类型之一：

String、Numeric、PowerObjectwindowtype：

string类型，指定要打开窗口的数据类型，该参数指定的窗口数据类型必须与windowvar参数的类型相同或是windowvar类型的后继对象parent：

可选项，指定要打开窗口的父窗口，要打开窗口成为父窗口的子窗口，只有当要打开窗口需要成为某个窗口的子窗口时才需要指定该参数。

如果应用程序使用Open（）函数打开某个子窗口或弹出窗口而又省略了该参数，那么当前活动窗口成为被打开窗口的父窗口返回值Integer。

函数执行成功时返回1，发生错误时返回-1。

如果任何参数的值为NULL，OpenWithParm（）函数返回NULL。