R Version 2.15.0/Windows XP
Maybe this will help to identify the problem (I have similar problems with
other tcltk-windows, too.)
Inserting some time delay after tktoplevel helps (on my PC):
> test2GUI <- function(){
> require(tcltk)
> MainWindow <- tktoplevel()
Sys.sleep(0.1)
> topMenu <- tkmenu(MainWindow)
> tkconfigure(MainWindow,menu=topMenu)
> tkgrab.set(MainWindow)
> tkfocus(MainWindow)
>}
Cheers
Andreas
Andreas Möltner
______________________________________________
[email protected] mailing list
https://stat.ethz.ch/mailman/listinfo/r-devel
