tcl - 如何禁止选择 TK Text 小部件？

Question

我试图找到在 Tk 文本小部件中抑制文本选择的最佳方法。下面是使用 Iwidget 的 ScrolledText 的代码示例：

package require Iwidgets
iwidgets::scrolledtext .t 
pack .t

我已经尝试绑定到<<Selection>>虚拟事件但未成功取消绑定<Double-1>事件。

有任何想法吗？

Answer 1

阻止创建选择有点尴尬（有很多绑定可以使用它），但是您可以轻松地阻止它影响应用程序的其余部分（通过将文本小部件配置为 have -exportselection false）。-selectbackground然后，您需要做的就是通过将其配置为不可见（通过文本小部件和-selectborderwidth选项）来确保它不可见。