Tcl / Tk：如何在靠近窗口时销毁根窗口

Question

当我执行以下代码时

#!/bin/sh
# \
exec wish "$0" ${1+"$@"}

set w .main
toplevel $w
wm title $w "FOO"

我有两个窗户而不是一个。 我试图隐藏愿望“。”窗口：

wm state . withdrawn

但无论如何当我关闭我的顶层窗口时，主要过程仍未完成。 我的问题是当我靠近窗口并完全完成这个过程时如何破坏愿望窗口？

Answer 1

如果您只想要一个窗口，为什么不在.窗口进行操作？

wm title . "FOO"

然后，当用户关闭该窗口时，您的应用将完成。