轻灵,内省,质朴,有为

checkbutton和button的联动

0 投票

@流吾思:我想写个checkbutton和button组合的按键,当checkbutton被选中后,button才起作用,这个应该怎么写?

最新提问 12月 10, 2015 分类:Tk GUI | 用户: 风行水上 (-30 分)

1个回答

0 投票

Code: link-check-button.tcl

pack [checkbutton .check -text "Check Me"]
pack [button .button -text "Click Me"]

.button configure -state disabled

.check configure -command {
  .button configure -state [expr {[set [.check cget -variable]]?"normal":"disabled"}]
}

# bind .check <1> {.button configure -state [expr {[set [%W cget -variable]]?"normal":"disabled"}]}


最新回答 12月 10, 2015 用户: 风行水上 (-30 分)
...