HyperMesh二次开发创建顶层窗口
在HyperMesh中进行二次开发我们经常会做一些弹窗插件,在窗口输入某些参数,实现某些功能,但是当我们需要重复使用这个功能的时候,只要中途有任何返回HyperMesh软件的操作,普通的窗口就会直接进入后台。
以下为实例代码:
destroy .\u9876\u5c42\u7a97\u53e3
set win .\u9876\u5c42\u7a97\u53e3
toplevel $win -padx 20 -pady 15
#下面这行代码为控制窗口在电脑窗口最顶层
wm attributes $win -topmost 1
set frm1 [frame $win.frm1]
set frm2 [frame $win.frm2]
pack $frm1 $frm2 -pady 10
set mat_lbl [label $frm1.lbl1 -text “点击任何位置” -width 20]
set mat_ent [entry $frm1.ent1 -textvariable demo -width 20 ]
set e_lbl [label $frm2.elbl -text “窗口依旧显示” -width 20]
set e_ent [entry $frm2.e -textvariable demo_1 ]
pack $mat_lbl $mat_ent -side left -padx 5 -pady 10
pack $e_lbl $e_ent -side left -padx 5 -pady 10