选择窗口小部件用于在Tk应用程序中选择不同的选项。可用选择窗口小部件的列表如下所示。
Sr.No. | Widgets & Remark |
---|---|
1 | Radiobutton 具有一组开/关按钮和标签的小部件,可以选择其中的一个。 |
2 | Checkbutton 具有一组开/关按钮和标签的小部件,可以选择其中的许多。 |
3 | Menu 充当菜单项持有者的小部件。 |
4 | Listbox 显示单元格列表的小部件,可以选择其中一个或多个。 |
下面是一个使用选择小部件的简单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 }
当无涯教程运行上面的程序时,将获得以下输出-