Constructor of box container widget with disclosure trigger and label
Constructor of box container widget with disclosure trigger and label
generic for toolkit dispatch
For gexpandgroup, the visible assignment method is overridden to change the disclosure state
The change handler for a expandGroup is called when the group changes visibility
gexpandgroup(text = "", markup = FALSE, horizontal = TRUE, handler = NULL, action = NULL, container = NULL, ..., toolkit = guiToolkit()) .gexpandgroup(toolkit, text = "", markup = FALSE, horizontal = TRUE, handler = NULL, action = NULL, container = NULL, ...) ## S3 replacement method for class 'GExpandGroup' visible(obj) <- value ## S3 method for class 'GExpandGroup' addHandlerChanged(obj, handler, action = NULL, ...)
text |
Label text |
markup |
logical. Does text have markup? (Toolkit dependent: only implemented for |
horizontal |
horizontal ( |
handler |
handler called when state is toggled |
action |
passed to handler |
container |
parent container |
... |
passed to parent's |
toolkit |
toolkit |
obj |
object receiving event and emitting a signal to the handler |
value |
logical. If |
An object of class GExpandGroup
inheriting from GFrame
if(interactive()) {
w <- gwindow("Box containers")
g <- gvbox(cont=w) # ggroup(horizonta=FALSE, ...)
nb <- gnotebook(cont=g); gbutton("one", label="one", cont=nb)
gframe("Frame", cont=g)
pg <- gpanedgroup(cont=g);
gbutton("one", cont=pg);
gbutton("two", cont=pg)
eg <- gexpandgroup(cont=g, horizontal=FALSE);
glabel("Click above to hide", cont=eg);
gbutton("one", cont=eg);
gbutton("two", cont=eg)
}Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.