Блог

Главная - Вопросы по программированию - Как связать ключи ‘ ‘ и ‘-‘ — это Tcl / Tk

Как связать ключи ‘ ‘ и ‘-‘ — это Tcl / Tk

#bind #tcl #tk

#привязать #tcl #tk-toolkit

Вопрос:

Как я могу привязать ключи и -к командам в Tcl / Tk?

Ответ №1:

Для этой конкретной проблемы:

 set foo "t:"
pack [label .l -textvar foo]
bind . <Key-plus> {append foo " "}
bind . <Key-KP_Add> {append foo "( )"}
bind . <Key-minus> {append foo "-"}
bind . <Key-KP_Subtract> {append foo "(-)"}

Но в целом вы можете найти имя ключа, запустив «xev» и нажав эту клавишу.

Комментарии:

1. В качестве альтернативы, запустите wish, запустите bind . <Key> {puts %K} в нем, а затем нажмите необходимые клавиши в окне wish — он напечатает соответствующие «keysyms» на консоли. Это кроссплатформенно по сравнению с xev тем, что можно найти только в X Window.