我正在尝试在 TCL/TK 中显示一个消息框,预计将关闭它以在父窗口中执行任何操作。当我执行下面的代码时,即使清除了消息框,文本框也会进入“禁用”状态。
wm title . "Message Box Demo"
tk::text .t0
grid .t0 -column 0 -row 1 -columnspan 2
tk_messageBox -type okcancel -message "Press Ok to confirm" \
-title "Update V 3.6" -icon "info"
如果我引入 TopLevel 以在 messageBox 中包含“父”窗口,它将打开一个新窗口作为顶级窗口并允许访问文本框。
wm title . "Message Box Demo"
toplevel .top1
tk::text .t0
grid .t0 -column 0 -row 1 -columnspan 2
tk_messageBox -type okcancel -parent .top1 -message "Press Ok to confirm" \
-title "Update V 3.6" -icon "info"
有人可以帮我找出这里有什么问题吗?