hm中创建按钮控件详解

  在hm开发中创建GUI按钮控件的方法有4种:
1. Tk提供的button函数或ttk::button;
2. Hyperworks新提供的hwtk::button函数;
3. Hyperworks旧的创建按钮的CanvasButton函数;
4. Utility Menu Commands中的*createbutton函数

  前三种函数为tcl/tk语言定义的创建按钮的,而第4个为Utility Menu Commands函数中用来在Utility页面上创建按钮,仅能在mac文件中使用。

button函数使用方法

  button是Tk提供的原生创建按钮控件的函数,其语法为:

ttk::button pathName ?options?
# 或
button pathName ?option?

  实例代码:

catch {destroy .window}
# 删除已有的window窗口
toplevel .window
# 创建window窗口
set btn [button .window.btn -text "按钮" -width 10 -font 10 -command {tk_message -message "按钮被点击"}]
# 创建按钮
pack $btn 
# 布局按钮

hwtk::button函数使用方法

  hwtk::button是hyperworks定义的按钮控件创建函数,因此只能在hyperworks软件(包括,hypermesh和hyperview)中使用,其使用方法与button类似,只是其部分参数有差别。

  实例代码:

catch {destroy .window}
# 删除已有的window窗口
toplevel .window
# 创建window窗口
set btn [hwtk::button .window.btn -text "按钮" -width 10  -command {tk_message -message "按钮被点击"}]
# 创建按钮,hwtk::button无字体大小定义参数
pack $btn 
# 布局按钮

CanvasButton函数使用方法

  CanvasButton是Hypermesh旧的创建按钮的函数。

  实例代码:

catch {destroy .window}
# 删除已有的window窗口
toplevel .window
# 创建window窗口
set btn [CanvasButton .window.btn 40 20 -text "按钮" -font 10 command  {Message "按钮被点击"}]
# 创建按钮,hwtk::button无字体大小定义参数
pack $btn 
# 布局按钮

createbutton函数使用方法

  *createbutton只能在mac文件中使用,在Hypermesh的Utility页面创建按钮,其使用语法如下:

  *createbutton (page name row column width color helpstring macroname arg1 …)

  实例代码:

createbutton(6, "Tkcon",-1, 0, 10, BUTTON, "Starts tcl command window ", "EvalTcl", "tkcon.tcl")
# 在Utility页面userpage页面下创建Tkcon按钮

本文链接:hm中创建按钮控件详解

转载声明:本站文章若无特别说明,皆为原创,转载请注明来源:CAECoder,谢谢!^^


发表评论