tcl - TK Text ウィジェットの選択を禁止するには?

Question

Tk テキストウィジェットでテキスト選択を禁止する最良の方法を見つけようとしています。以下は、Iwidget の ScrolledText を使用したコードの例です。

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

<<Selection>>私はすでに仮想イベントにバインドしようとしましたが、まだ<Double-1>イベントのバインドを解除できませんでした。

何か案は？

Answer 1

選択範囲が作成されないようにするのはやや厄介ですが (それを処理するバインディングが非常に多くあります) 、アプリケーションの残りの部分に影響を与えるのを簡単に防ぐことができ-exportselection falseます (テキスト ウィジェットに を設定することにより)。-selectbackgroundあとは、(テキスト ウィジェットのと-selectborderwidthオプションを使用して)非表示に設定することで、表示されないようにするだけです。