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

Sun, 06 Dec 2015 02:59:45 -0800 

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 <kle...@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@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@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.

Reply via email to