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

[peter dalgaard]

Well, if it was _my_ problem (and it isn't...), I'd get hold of the documentation for TkTable and figure out how you are supposed to do it with Tcl/Tk, then figure out how to do the same thing(s) from R. You should have the building blocks by now.

-pd


> On 06 Dec 2015, at 11:57 , Cleber N.Borges <klebyn at yahoo.com.br> wrote:
> 
> thanks by the help
> but I do not understand how to set a tag in cell table.
> 
> cleber
> 
> 
> Em 05/12/2015 18:57, peter dalgaard escreveu:
>>> 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.
> 
> 
> ---
> 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