| TkWidgets {tcltk} | R Documentation |
Create Tk widgets and associated R objects.
tkwidget(parent, type, ...)
tkbutton(parent, ...)
tkcanvas(parent, ...)
tkcheckbutton(parent, ...)
tkentry(parent, ...)
ttkentry(parent, ...)
tkframe(parent, ...)
tklabel(parent, ...)
tklistbox(parent, ...)
tkmenu(parent, ...)
tkmenubutton(parent, ...)
tkmessage(parent, ...)
tkradiobutton(parent, ...)
tkscale(parent, ...)
tkscrollbar(parent, ...)
tktext(parent, ...)
tktoplevel(parent = .TkRoot, ...)
ttkbutton(parent, ...)
ttkcheckbutton(parent, ...)
ttkcombobox(parent, ...)
ttkframe(parent, ...)
ttklabel(parent, ...)
ttklabelframe(parent, ...)
ttkmenubutton(parent, ...)
ttknotebook(parent, ...)
ttkpanedwindow(parent, ...)
ttkprogressbar(parent, ...)
ttkradiobutton(parent, ...)
ttkscale(parent, ...)
ttkscrollbar(parent, ...)
ttkseparator(parent, ...)
ttksizegrip(parent, ...)
ttkspinbox(parent, ...)
ttktreeview(parent, ...)
parent |
Parent of widget window. |
type |
string describing the type of widget desired. |
... |
handled via |
These functions create Tk widgets. tkwidget creates a widget of
a given type, the others simply call tkwidget with the
respective type argument.
The functions starting ttk are for the themed widget set for Tk
8.5 or later. A tutorial can be found at https://tkdocs.com/.
It is not possible to describe the widgets and their arguments in full. Please refer to the Tcl/Tk documentation.
TclInterface, TkCommands,
TkWidgetcmds
## Not run:
## These cannot be run by examples() but should be OK when pasted
## into an interactive R session with the tcltk package loaded
tt <- tktoplevel()
label.widget <- tklabel(tt, text = "Hello, World!")
button.widget <- tkbutton(tt, text = "Push",
command = function()cat("OW!\n"))
tkpack(label.widget, button.widget) # geometry manager
# see Tk-commands
## Push the button and then...
tkdestroy(tt)
## test for themed widgets
if(as.character(tcl("info", "tclversion")) >= "8.5") {
# make use of themed widgets
# list themes
themes <- as.character(tcl("ttk::style", "theme", "names"))
themes
# select a theme -- for pre-XP windows
# tcl("ttk::style", "theme", "use", "winnative")
tcl("ttk::style", "theme", "use", themes[1])
} else {
# use Tk 8.0 widgets
}
## End(Not run)