Hi,
There are many ways to do that.
An example:
require(tcltk)
tt <- tktoplevel()
te <- tkentry(tt)
tl <- tklabel(tt)
tb <- tkbutton(tt)
tkconfigure(tl, text = 'Enter text')
tkconfigure(tb, text = 'Show', command = function()
{cat(as.character(tkget(te)))})
tkgrid(tl, row = 0, column = 0, sticky = 'e')
tkgrid(te, row = 0, column = 1, sticky = 'e')
tkgrid(tb, row = 1, column = 0, columnspan = 2)
Sys.sleep(2)
tkgrid.remove(tl, te, tb)
tkgrid(tl, row = 0, column = 0, sticky = 'w')
tkgrid(te, row = 1, column = 0, sticky = 'w')
tkgrid(tb, row = 0, column = 1, rowspan = 2)
Anyway you should have a look \Tcl\doc which is included in the standard R
dist.
Greetings
[[alternative HTML version deleted]]