Динамически изменить границу gbutton в R - PullRequest
1 голос
/ 13 февраля 2012

Я использую пакет gWidgets в R (в частности, инструментарий RGtk2). Я создал несколько кнопок, и вы можете указать на создание 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?

1 Ответ

2 голосов
/ 13 февраля 2012

Вы можете сделать это, управляя базовым объектом 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, так как не знал, что это полезно.

...