hello all,
I'm trying to build a table within a frame. I would like the table to
expand when the entire window is expanded.
I could not find examples of how to solve this problem.
I thank you in advance for help.
Cleber
#######################################
# piece of the code
library( tcltk )
tclRequire( "Tktable" )
dataorgW <- tktoplevel()
fmMenu <- tkframe( dataorgW, borderwidth=10, relief="groove", bg='red' )
tkpack( fmMenu, expand=1, fill='both' )
scrX <- tkscrollbar( fmMenu, command=function(...) tkxview( tableData,
... ), orient="horizontal" )
scrY <- tkscrollbar( fmMenu, command=function(...) tkyview( tableData,
... ), orient="vertical" )
height <- -1; width <- -1
tableData <- tkwidget( fmMenu, "table", rows=50, cols=50,
titlerows=1, titlecols=1,
height=height+1,width=width+1,
xscrollcommand=function(...) tkset( scrX, ... ),
yscrollcommand=function(...) tkset( scrY, ... ),
rowstretch='all', colstretch='all'
)
tkconfigure( tableData, multiline=0 )
tkgrid( tableData, scrY )
tkgrid.configure( scrY, sticky="nsw")
tkgrid( scrX, sticky="new" )
tclarray <- tclArray()
tkconfigure( tableData, variable=tclarray, selectmode="extended",
background="white" )
---
Este email foi escaneado pelo Avast antiv�rus.
https://www.avast.com/antivirus
[[alternative HTML version deleted]]
______________________________________________
R-help@r-project.org mailing list -- To UNSUBSCRIBE and more, see
https://stat.ethz.ch/mailman/listinfo/r-help
PLEASE do read the posting guide http://www.R-project.org/posting-guide.html
and provide commented, minimal, self-contained, reproducible code.
