Tk - Widgets de selección
Los widgets de selección se utilizan para seleccionar diferentes opciones en una aplicación Tk. La lista de widgets de selección disponibles se muestra a continuación.
No Señor. | Widgets y descripción |
---|---|
1 | Boton de radio Widget que tiene un conjunto de botones y etiquetas de encendido / apagado, uno de los cuales puede seleccionarse. |
2 | Botón de verificación Widget que tiene un conjunto de botones y etiquetas de encendido / apagado, muchos de los cuales pueden seleccionarse. |
3 | Menú Widget que actúa como soporte para los elementos del menú. |
4 | Cuadro de lista Widget que muestra una lista de celdas, una o más de las cuales se pueden seleccionar. |
A continuación se muestra un ejemplo simple de Tk usando widgets de selecció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
}
Cuando ejecutamos el programa anterior, obtendremos el siguiente resultado: