Displaying 1 result from an estimated 1 matches for "screrghor".
2009 Oct 12
0
tktext-window smaller than text
...scroll to the end of the text.
tt <- tktoplevel()
txt <- tktext(tt, width=100, height=30)
scrergVert <- tkscrollbar(tt, orient = "vertical", repeatinterval = 1,
command = function(...) tkyview(txt, ...))
tkconfigure(txt, yscrollcommand = function(...) tkset(scrergVert, ...))
scrergHor <- tkscrollbar(tt, orient = "horizontal", repeatinterval =
1, command = function(...) tkxview(txt, ...))
tkconfigure(txt, xscrollcommand = function(...) tkset(scrergHor, ...))
tkgrid(txt, column=0, row=0, sticky="nwse")
tkgrid(scrergVert, column=1, row=0, sticky="ns&q...