Tk - Công cụ lựa chọn

Các widget lựa chọn được sử dụng để chọn các tùy chọn khác nhau trong ứng dụng Tk. Danh sách các widget lựa chọn có sẵn như hình dưới đây.

Sr.No.	Widget & Mô tả
1	Nút radio Tiện ích có một tập hợp các nút và nhãn bật / tắt, một trong số đó có thể được chọn.
2	Nút kiểm tra Tiện ích có một tập hợp các nút và nhãn bật / tắt, nhiều trong số đó có thể được chọn.
3	Thực đơn Widget hoạt động như một ngăn chứa các mục menu.
4	Hộp danh sách Widget hiển thị danh sách các ô, một hoặc nhiều ô có thể được chọn.

Dưới đây là một ví dụ Tk đơn giản bằng cách sử dụng các widget lựa chọn -

#!/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 
}

Khi chúng ta chạy chương trình trên, chúng ta sẽ nhận được kết quả sau: