Cleber N.Borges
2015-Dec-05 19:15 UTC
[R] tcltk TK table : Is it possible to block the cell? [Question in 2003, but TK changes the interfaces functions]
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")
I tried to adapt to:
tktag.add (table1, "celltag" "ZeroOne", "0.1")
but I get error. How to adapt it?
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
peter dalgaard
2015-Dec-05 20:57 UTC
[R] tcltk TK table : Is it possible to block the cell? [Question in 2003, but TK changes the interfaces functions]
> 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
Cleber N.Borges
2015-Dec-06 10:57 UTC
[R] tcltk TK table : Is it possible to block the cell? [Question in 2003, but TK changes the interfaces functions]
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