表3.6 常用窗口函数及其使用方式技巧

If bValid Then
//有关处理
End If
返回下一个表单窗口
mdiframewindow.GetNextSheet（sheet）
状态行中显示字符串
windowname.SetMicroHelp（string）
Windowname:带微帮助的MDI框架窗口名称
String:要显示的字符串
1:成功
mdiframewindow: MDI框架窗口
成功返回
window对象;
一般用
取当前活动表单窗口:
window activesheet
activesheet=w_frame.GetActiveSheet（）
触发事件
返回第一个表单窗口
mdiframewindow.GetFirstSheet（）
IsValid（）
它与置窗口的Visible属性为TRUE的结果是相同的，即等同于语句: w_myw.Visible=
TRUE
续表
类型
函数
功能
ห้องสมุดไป่ตู้语法
格式
入口
参数
返回值
例子
窗
口
的
操
作
隐藏窗口
objectname.Hide（）
objectname:窗口、控件或其他对象的名称
1:成功
-1:出错
隐藏w_myw窗口: w_myw.Hide（）
Layer!或Original!
1:成功
-1:出错
在MDI框架窗口MDI_User中打开表单窗口child_1，保持表单窗口原有尺寸，并将打开表单名称加到选单条第2项:
OpenSheet（child_1，MDI_User，2，Original!）
返回当前活动表单窗口
mdiframewindow.GetActiveSheet（）
w_myw.Height*2）
MD
I
窗口
打开表单窗口
OpenSheet（sheetrefvar
{,windowtype }，
mdiframe
{, position
{,arrangeopen }}）
Sheetrefvar:MDI窗口外的任何窗口类型的变量; windowtype:要打开窗口的类型; mdiframe: MDI框架窗口名称; position:要打开表单在选单中的编号; arrangeopen:要打开表单出现的格式，取值Cascaded!，
表3.6常用窗口函数及其使用方法
类型
函数
功能
语法
格式
入口
参数
返回值
例子
窗
口
的
操
作
打开窗口
（无参数）
Open（windowvar {，Parent}）
windowvar:窗口变量名;
parent:
父窗口变量名
1:打开窗口成功
-1:出错
1．打开名叫w_myw的窗口：Open
（w_myw）
2．打开cw_dat类型的子窗口，其父窗口为w_myw：
函数判断返回窗口是否有效
对所有打开的表单进行循环处理:
window wSheet
wSheet=ParentWindow.GetFirstSheet（）If
IsValid（wSheet）
Then wSheet=ParentWindow.GetNextSheet
（wSheet）
bValid = IsValid（wSheet）
窗口变量名;
rtnval:
要返回的值，见（1）
1:成功
-1:出错
关闭响应窗口w_myw，返回字符串：
CloseWithReturn
（Parent，sle_name.Text）
显示窗口
objectname.Show
（）
objectname:窗口、控件或其他对象的名称
1:成功
-1:出错
显示w_myw窗口: w_myw.Show（）
word和long:传递的事件参数，见（2）
TRUE:
成功
FALSE:
失败
触发父窗口中用户自定义事件
cb_exit_request:
Parent.TriggerEvent（"cb_exit_request"）
触发事件
（放入事件队列）
objectname.PostEvent（event, { word，
w_myw.Move（80，120）
改变窗口大小
objectname.Resize（width，height）
objectname:窗口、控件或其他对象的名称;
width:新的宽度
height:新的高度
1:成功
-1:出错
将窗口w_myw的尺寸放大一倍:
w_myw.Resize（w_myw.Width*2，
-1:出错
在带微帮助的MDI框架窗口W_New的状态行中显示字符串"测试正在进行":
W_New.SetMicroHelp（"测试正在进行"）
续表
类型
函数
功能
语法
格式
入口
参数
返回值
例子
触发事件
触发事件
objectname.Trigger
Event（event
{, word, long }）
objectname:对象名称; event:要触发的事件；
OpenWithParm
（w_employee，"James Newton"）
关闭窗口
Close（wndname）
wndname:
窗口变量名
1:成功
-1:出错
关闭窗口w_myw:
Close（w_myw）
关闭窗口
（带返回值）
CloseWithReturn
（Wndname，rtnval）
wndname:
child cw_dat Open（cw_dat，w_myw）
3．打开2个w_myw类型的窗口：
w_myw w_w1，w_w2
Open（w_w1）
Open（w_w2）
打开窗口
（带参数）
OpenWithParm（windowvar, parameter
{,parent }）
parameter:
传递的参数，见（1）
long }）
将控制按钮cb_OK的Clicked事件放入事件队列中：
cb_OK.PostEvent（Clicked!）
它与置窗口的Visible属性为FALSE的结果是相同的，即等同于语句:
w_myw.Visible=FALSE
移动窗口
objectname.Move（x,y）
objectname:窗口、控件或其他对象的名称;
（x,y）：移动目标点位置PBU
1:成功
-1:出错
将窗口w_myw移动到（80，120）处: