PB6.5在窗口刚打开动态调整Tab

在开发中我们会遇到，在主窗口中利用Radio Button 选择后，打开另一窗口，将新窗口中的Tab页面设定为自己对应的页面。利用Openwithparm()打开新窗口带入参数，在窗口的Open事件中加入Selecttab()函数设定Tab的默认页面不成功。

　 原因：在窗口的Open 事件执行后，窗口中的控件开始设定各自的默认值。Tab原默认值将自己设定的属性值覆盖，跳转失败。

　 解决方法：利用PostEvent()函数触发一自定义事件，在自定义事件中完成控件的属性值设定。

　 具体步骤：

 窗口: 主窗口（W_main）,子窗口（w_try）
 w_main的控件
 收音机按钮：rb_1, rb_2, rb_3
 命令按钮：cb_1
 w_try 的控件
 TAB：tab_1中三个页面tabpage_1,
 tabpage_2, tabpage_3

 增加w_try一自定义事件d_cust 无事件id，返回参数无。
 
 编写cb_1 的Clicked事件
 integer t_sele
 // 定义选择后带入的参数
 if rb_1.Checked then
 t_sele = 1
 elseif rb_2.Checked then
 t_sele = 2
 elseif rb_3.Checked then
 t_sele = 3
 else
 t_sele = 0
 end if
 // 打开子窗口并带入选择变量
 OpenWithParm(W_try, t_sele)

 W_try中的Open事件
 Double R_sele
 // 获取选择参数
 R_sele = message.DoublePram
 …
// 出发自定义事件d_cust 带入一数值形参数
Parent.PostEvent("d_cust", 0, R_sele) 


 W_try 的d_cust 事件
integer r_sele
 // 得到选择参数
 r_sele = message.LongParm 
 // 设定tab页面
tab_1.selecttab(r_sele)
 
字串6
 

　 用户如想动态改变窗口中放置的控件的默认属性，改变中具体操作即可。

字串6