r - 在R中动态改变gbutton的边框

Question

我在 R 中使用 gWidgets 包（特别是 RGtk2 工具包）。我创建了一些 gbuttons，您可以在创建时指定border=FALSE 或border=TRUE。有没有办法动态改变这个选项？我知道您可以使用 svalue 更改按钮上的文本，但我找不到更改它的方法

win <- gwindow()
gg <- ggroup(cont = win)
gb1 <- gbutton("TRUE", border = TRUE, cont = gg)
gb2 <- gbutton("FALSE", border = FALSE, cont = gg)

有没有办法动态地使 gb2 看起来像 gb1？

Answer 1

您可以通过操作底层 RGtk 对象来做到这一点，例如：

library(gWidgets)
options(guiToolkit="RGtk2")
library(RGtk2) ## needed to call underlying methods through $
b <- gbutton("some button", cont=gwindow())

getToolkitWidget(b)$setRelief("none") ## one of GtkReliefStyle values

我从 gWidgets2 中取出了边框参数，因为我不知道它是否有用。