Tcl/Tk:最大化窗口/确定窗口是否最大化?

您可以发现是否使用 wm state $toplevel (寻找 zoomed 作为返回值)。但是

<Visibility>

编写了一个函数,将可见性事件传播到给定的小部件及其所有子部件。

tkevent.propagate <- function(w,e) {
  tkevent.generate(w, e)
  children <- as.character(tkwinfo("children", w))
  if(length(children)>0) lapply(children, function(c) tkevent.propagate(c,e))
}