Searched refs:butPress (Results 1 - 1 of 1) sorted by relevance

/ast/src/lib/libtk/library/demos/
H A Ditems.tcl149 button $c.button -text "Press Me" -command "butPress $c $red"
278 proc butPress {w color} { procedure

Completed in 19 milliseconds