TK選擇Widget
選擇窗口小部件用於選擇在一個Tk應用程序不同的選項。可用的選擇窗口小部件的列表,如下所示。
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 }
當我們運行上麵的程序,會得到下麵的輸出。