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

[Cleber N.Borges]

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