在开发中我们会遇到,在主窗口中利用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)
|