Tcl / Tk将鼠标单击绑定到顶部栏

时间:2017-11-19 15:25:22

标签: tcl bind tk toplevel

我正在Tcl / Tk中开发一些应用程序,我想在我的GUI上添加一个功能,以最小化窗口离开屏幕当前位置的窗口。 这张照片更好地解释了我的想法。

enter image description here

当鼠标指针在栏中时(抱歉,如果名称错误但我不知道GUI部分的技术名称)我按下鼠标按钮,窗口如下所示。

我在脚本中添加了这行以进行测试

bind . <Button-3> "wm geometry . 200x1"

但是这项工作仅在顶层的框架区域很好。当鼠标完全位于图形位置时,我的问题是绑定事件。 任何人都知道我该怎么做?

提前感谢您的帮助

1 个答案:

答案 0 :(得分:0)

你无法做你想做的事。 Tk几乎无法控制窗口管理器添加的装饰中发生的事情。简而言之,您无法处理窗口边框或标题区域中发生的事件。