Displaying 6 results from an estimated 6 matches for "tkselect".
Did you mean:
tk_select
2001 Feb 22
2
Problem with tcltk listbox
...}
tkpack(protas.yscroll,protas.listbox,side="left",fill="y")
tkpack(sas.yscroll,sas.listbox,side="left",fill="y")
tkbind(protas.listbox,"<Button-1>",function()
{
asselection<- tkcurselection(protas.listbox)
tkselection.clear(sas.listbox,0,"end")
tksee(sas.listbox,asselection) tkselection.set(sas.listbox,asselection)
})
})
Thanks
--
Frank Gerrit Zoellner
-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-.-
r-help mailing li...
2006 Oct 21
0
tcltk: multiple listboxes, selection
...elframe", text = "X value")
tl.x <- tklistbox(frame.x, height = length(xvals) / 2,
width = 50, selectmode = "browse", background = "white")
for(i in seq(from=1, to=length(xvals), by=2)) {
tkinsert(tl.x, "end", xvals[[i]])
}
tkselection.set(tl.x, 0)
tkgrid(tl.x, sticky="news")
# Y values
frame.y <- tkwidget(tt, "labelframe", text = "Y value(s)")
tl.y <- tklistbox(frame.y, height = 20, #length(yvals) / yvals.field.count,
yscrollcommand=function(...) tkset(scr.y,...),...
2008 Nov 23
1
tklistbox - R-Objekt
...eight=4,selectmode="single",background="white")
tkgrid(tklabel(tt,text="select method for LAI calculation"))
tkgrid(tl)
method<- c("method1","method2")
for (i in (1:2)){
tkinsert(tl,"end",method[i])
}
tkselection.set(tl,0)
OnOK <- function(){
choice<-method[as.numeric(tkcurselection(tl))+1]
tkdestroy(tt)
}
OK.but <-tkbutton(tt,text=" OK ",command=OnOK)
tkbind(tkgrid, "<Return>",OnOK)
tkgrid(OK.but)
The function works, but...
2003 Jun 06
4
stuck tcltk scrollbars under Windows XP
...tkbutton(window2, text="OK", width="12", command=onOK,
default="active")
tkgrid(xBox, xScroll, sticky="nw")
tkgrid.configure(xScroll, sticky="ns")
tkgrid(xFrame, sticky="w")
tkgrid(OKbutton, sticky="w")
tkselection.set(xBox, 0)
tkbind(window2, "<Return>", onOK)
tkfocus(window2)
tkgrab(window2)
I find that I can make the scrollbar stick under Windows XP by repeatedly
and rapidly pressing the scroll-down button. As mentioned, removing the
calls to tkgrab() and tkgrab.release...
2006 Dec 12
2
tklistbox...
...a,height=4,selectmode="multiple",background="white")
tkgrid(tklabel(janela,text="Seleccione o(s) trimestre(s):"))
tkgrid(tl)
trim <- c("T1","T2","T3","T4")
for (i in (1:4))
{
tkinsert(tl,"end",trim[i])
}
#tkselection.set(tl,2)
#Listbox com as regiões
t2<-tklistbox(janela,height=4,selectmode="multiple",background="white")
tkgrid(tklabel(janela,text="Seleccione pelo menos uma das regiões:"))
tkgrid(t2)
reg <- c("Norte","Centro, Lisboa e Alentejo",...
2013 Sep 01
1
[PATCH] remove a duplicate tk function definition (and alphabetize)
...ot;scan", "mark", ...)
-tkscan.dragto <- function(widget, ...) tcl(widget, "scan", "dragto", ...)
tksearch <- function(widget, ...) tcl(widget, "search", ...)
tksee <- function(widget, ...) tcl(widget, "see", ...)
tkselect <- function(widget, ...) tcl(widget, "select", ...)
@@ -563,7 +562,6 @@
tcl(widget, "selection", "to", ...)
tkset <- function(widget, ...) tcl(widget, "set", ...)
tksize <- function(widget, ...) tcl(widget, "size...