Как связать наведение мыши в tcl/tk

Я хочу привязать элемент, чтобы при наведении на него мыши он что-то делал. Какой модификатор разрешает такой бинд?


tcl tk
person SIMEL    schedule 24.07.2012    source источник

Ответы (1)


arrow_upward
6
arrow_downward

События <Enter> и <Leave>. Например:

place [frame .f -width 100 -height 100 -bg red] -x 10 -y 10
bind .f <Enter> {%W configure -bg blue}
bind .f <Leave> {%W configure -bg red}
person patthoyts    schedule 24.07.2012