1.引言#

面对各种各样的问题，会设计各种插件，每次使用都需要去找文件，因此本文提供了一种集合插件的调用思路。

2.思路#

当建立多种hypermesh插件时，可以通过总窗口，将所有的插件集合起来，并通过设置快捷方式调用窗口总（shift+A）。
总窗口通过快键进行调用，同时设计一个交互传递参数的二级窗口，通过二级窗口获取的数据调用插件。例如代码实现中的button2。

3.实现总窗口#

1
#创建同一层层级的窗口，,mywin 为窗口路径
2
toplevel .mywin
3
#设置窗口标题
4
wm title .mywin "整合功能工具"
5
#设置窗口大小和位置
6
wm geometry .mywin 300x250+1600+150
7
#窗口放到最前面
8
wm attributes .mywin -topmost 1
9
#创建五个个图标按钮，路径为.mywin.iconBtni
10
button .mywin.iconBtn1 -text "多工况线性插值" -command {button1} -font {Arial 10 bold}
11
button .mywin.iconBtn2 -text "RBE3抓取" -command {button2} -font {Arial 10 bold}
12
button .mywin.iconBtn3 -text "功能3" -command {tk_messageBox -message "功能3待开发"} -font {Arial 10 bold}
13
button .mywin.iconBtn4 -text "功能4" -command {tk_messageBox -message "功能4待开发"} -font {Arial 10 bold}
14
button .mywin.iconBtn5 -text "功能5" -command {tk_messageBox -message "功能5待开发"} -font {Arial 10 bold}
15
#显示图标按钮，用grid布局管理器放置控件,并居中对齐
16

17
grid .mywin.iconBtn1 -row 0 -column 0 -padx 60 -pady 10 -sticky "nsew"
18
grid .mywin.iconBtn2 -row 1 -column 0 -padx 60 -pady 10 -sticky "nsew"
19
grid .mywin.iconBtn3 -row 2 -column 0 -padx 60 -pady 10 -sticky "nsew"
20
grid .mywin.iconBtn4 -row 3 -column 0 -padx 60 -pady 10 -sticky "nsew"
21
grid .mywin.iconBtn5 -row 4 -column 0 -padx 60 -pady 10 -sticky "nsew"
22
#设置列宽度自适应
23
grid columnconfigure .mywin 0 -weight 1
24
grid rowconfigure .mywin 0 -weight 1
25

26
#创建第一个按钮功能
27
proc button1 {} {
28
    source C:/Users/31539/Desktop/work/tcl/Hypermsh_LIner_Interpolation_batch.tcl
29
}
30

31
#创建第二个按钮功能
32
proc button2 {} {
33
    source C:/Users/31539/Desktop/work/tcl/Win2.tcl
34
}