User interface 在tcl/tk中创建新窗口

如何通过每次单击按钮而不关闭当前按钮来创建相同的gui

wm title . "abcd"
wm geometry . 50x50
pack [button .b -text "new"]

---

请帮帮我。

toplevel命令为您创建了一个新窗口，用于放置小部件。最好使用一个过程在该窗口中构建整个GUI：

wm title . "abcd"
wm geometry . 50x50
pack [button .b -text "new" -command makeWindow]
set counter 0

proc makeWindow {} {
    # Make a unique widget name
    global counter
    set w .gui[incr counter]

    # Make the toplevel
    toplevel $w
    wm title $w "This is $w"

    # Put a GUI in it
    pack [label $w.xmpl -text "This is an example"]
    pack [button $w.ok -text OK -command [list destroy $w]]
}

---

您创建的这些窗口中的每一个都是独立的或依赖于其他窗口的。这取决于您如何编写代码、排列变量、设计回调等。

关闭第一个GUI时会发生什么？通过按下

新建

按钮创建的所有其他窗口是否也应关闭？是的，所有窗口都将关闭。