如何绑定“”和'-'键是 Tcl/Tk

Question

如何将 + 和 - 键绑定到 Tcl/Tk 中的命令？

Answer 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”并按该键来找到键名称。