[R] tcltk TK table : Is it possible to block the cell? [Question in 2003, but TK changes the interfaces functions]

[peter dalgaard]

> On 05 Dec 2015, at 20:15 , Cleber N.Borges <klebyn at yahoo.com.br> wrote:
> 
> in 2003 [1] someone asked for:
> "Is it possible to" block "the cell?"
> but the solution involves the "tkcmd" that no longer exists ...
> 
> tkcmd (.Tk.ID (table1), "tag", "celltag" "ZeroOne", "0.1")

tcl() should be a drop-in replacement. The .Tk.ID() business should no longer be necessary, though. tcl(table1, "tag", "celltag",....)


> 
> I tried to adapt to:
> 
> tktag.add (table1, "celltag" "ZeroOne", "0.1")
> 
> but I get error. How to adapt it?

Stop guessing and start thinking? 

That would be equivalent to

tcl(table1, "tag", "add", "celltag" "ZeroOne", "0.1")

and as the error message *clearly* says, there is no tag option "add"!

-pd

> 
> Where it could have informations about the tcltk package as it does not have the detailed help?
> 
> thanks in advanced for help
> cleber
> 
> [1] - http://grokbase.com/p/r/r-help/037xs650d8/r-tktable-disable-cell
> 
> 
> ############
> > tclRequire("Tktable")
> <Tcl> 2.9
> > tt <- tktoplevel()
> > table1 <- tkwidget(tt,"table",bg="white")
> > tkpack(table1)
> <Tcl>
> > tkcmd(.Tk.ID(table1),"tag","celltag","ZeroOne","0,1")
> Error: could not find function "tkcmd"
> >
> > tktag.add( table1,"tag","celltag","ZeroOne","0,1")
> Error in structure(.External(.C_dotTclObjv, objv), class = "tclObj") :
>  [tcl] bad tag option "add": must be celltag, cget, coltag, configure, delete, exists, includes, lower, names, raise, or rowtag.
> >
> >
> > tkcmd(.Tk.ID(table1),"tag","celltag","ZeroTwo","0,2")
> Error: could not find function "tkcmd"
> > tkcmd(.Tk.ID(table1),"tag","configure","ZeroOne",state="disabled",bg="gray")
> Error: could not find function "tkcmd"
> > tkcmd(.Tk.ID(table1),"tag","configure","ZeroTwo",state="normal",bg="white")
> Error: could not find function "tkcmd"
> >
> > .Tcl("set tclarray(0,0) Normal")
> <Tcl> Normal
> > .Tcl("set tclarray(0,1) Disabled")
> <Tcl> Disabled
> > .Tcl("set tclarray(0,2) Normal")
> <Tcl> Normal
> > tkconfigure(table1,variable="tclarray")
> <Tcl>
> 
> 
> ---
> Este email foi escaneado pelo Avast antivírus.
> https://www.avast.com/antivirus
> 
> ______________________________________________
> R-help at 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.

-- 
Peter Dalgaard, Professor,
Center for Statistics, Copenhagen Business School
Solbjerg Plads 3, 2000 Frederiksberg, Denmark
Phone: (+45)38153501
Email: pd.mes at cbs.dk  Priv: PDalgd at gmail.com