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

/ast/src/lib/libtk/library/demos/
H A Dfloor.tcl8 # floorDisplay --
17 proc floorDisplay {w active} { procedure
1353 floorDisplay $c 3
1357 $c bind floor1 <1> "floorDisplay $c 1"
1358 $c bind floor2 <1> "floorDisplay $c 2"
1359 $c bind floor3 <1> "floorDisplay $c 3"

Completed in 24 milliseconds