R 如何在gWidgets2的`gbasicdialog（）`实例中禁用OK按钮？

考虑：

fix_df <- function(DF, ...) {
  dfname <- deparse(substitute(DF))
  w <- gbasicdialog(..., handler=function(h,...) {
    assign(dfname, df[,], .GlobalEnv)
  })
  g <- ggroup(cont=w, horizontal=FALSE)
  glabel("Edit a data frame", cont=g)
  df <- gdf(DF, cont=g, expand=TRUE)
  size(w) <- c(400, 400)
  out <- visible(w)
}

m <- mtcars[1:3, 1:4]
fix_df(m)

如何以编程方式禁用w中的OK按钮

有一个do.buttons参数不显示按钮。要接近按钮，需要挖掘内部构件。您可以在gWidgets2RGtk2中实现do.buttons的地方看到这是如何被破解的