如何查找鼠标光标索引

时间:2010-09-07 09:39:39

标签: perl tk

您好我用“undotext”小部件编写了一个脚本, 我正在寻找一种获取鼠标光标所在位置的线索引的方法。

并且类似地当用户选择了部分行时。

1 个答案:

答案 0 :(得分:1)

要在 text 坐标(不仅仅是x,y)中获取鼠标光标的当前位置,您需要执行以下操作:

$txt->index("current");

或者这个(其中$x$y给出鼠标光标位置相对于文本小部件):

$txt->index("@$x,$y");

第一个肯定更方便,但如果您处于拖动的中间,则需要第二个(当任何鼠标按钮关闭时current标记未更新)。