Tk - 选择小组件

选择小组件用于在 Tk 应用程序中选择不同的选项。可用选择小组件的列表如下所示。

序号	小组件和描述
1	单选按钮包含一组开/关按钮和标签的小组件，其中可以选择其中的一个。
2	复选框包含一组开/关按钮和标签的小组件，其中可以选择多个。
3	菜单用作菜单项占位符的小组件。
4	列表框显示单元格列表的小组件，可以选择一个或多个单元格。

使用选择小组件的简单 Tk 示例如下 −

#!/usr/bin/wish

grid [frame .gender ]
grid [label .label1  -text "Male" -textvariable myLabel1 ] 
grid [radiobutton .gender.maleBtn -text "Male"   -variable gender -value "Male"
   -command "set  myLabel1 Male"] -row 1 -column 2
grid [radiobutton .gender.femaleBtn -text "Female" -variable gender -value "Female"
   -command "set  myLabel1 Female"] -row 1 -column 3
.gender.maleBtn select
grid [label .myLabel2  -text "Range 1 not selected" -textvariable myLabelValue2 ] 
grid [checkbutton .chk1 -text "Range 1" -variable occupied1 -command {if {$occupied1 } {
   set myLabelValue2 {Range 1 selected}
} else {
   set myLabelValue2 {Range 1 not selected}
} }]
proc setLabel {text} {
   .label configure -text $text 
}

当我们运行以上程序时，将获得以下输出 −

打印页面

序号	小组件和描述
1	单选按钮包含一组开/关按钮和标签的小组件，其中可以选择其中的一个。
2	复选框包含一组开/关按钮和标签的小组件，其中可以选择多个。
3	菜单用作菜单项占位符的小组件。
4	列表框显示单元格列表的小组件，可以选择一个或多个单元格。