Tcl / tk我怎么知道选择何时以及选择哪个单选按钮？

Question

我一直在用似乎如此微不足道的东西喋喋不休=（

我需要知道选择了哪个单选按钮，以便启用和禁用我的输入。

UNIQUE

这就是我尝试的，在这里和那里改变一些位，但结果永远不是我想要的，在这个例子中，无法识别reptype变量。

Answer 1

您可以对变量使用跟踪，也可以使用-command回调。在您的情况下，我建议使用-command回调。

set ::reptype 0
radiobutton .t.r1 -text "Default" -variable reptype -value 0 -command entrystate
radiobutton .t.r2 -text "Custom" -variable reptype -value 1 -command entrystate
entry .t.ecustom -state disabled
grid .t.r1
grid .t.r2 .t.ecustom
grid columnconfigure .t 1 -weight 1

proc entrystate {} {
    if {$::reptype} {
        .t.ecustom configure -state normal
    } else {
        .t.ecustom configure -state disabled
    }
}