tcl - 如何从命令中获取画布小部件名称？

Question

我尝试制作部分由打开它的小部件定义的弹出菜单。我似乎找不到找到打开菜单的小部件的方法。例如：

.f.canvas bind all <3> {
  puts stderr "%W just gives me '.f.canvas'"
}

小部件名称将用于在另一个表中查找以更改与特定小部件相关的对象的属性。

标签： tcltk

Answer 1

尝试

.f.canvas bind all <3> {
    puts stderr [%W find closest %x %y]
}

它应该显示您单击的项目的 ID。