D 2018-09-16T09:03:49.050
J assignee nobody
J closer nobody
J cmimetype text/plain
J comment Bll\ssubmit\s\s:\sdeselect\sis\snot\ssupported\s?\sBut\sdeselect\sis\sin\scurrent\sdoc\s8.6\r\nhttps://www.tcl.tk/man/tcl/TkCmd/radiobutton.htm\r\nFurthermore\sthe\ssoluce\sproposed\snot\swork\sset\sreptyp\s0,\sthe\sonly\ssoluce\swork\sis\sto\sactivate\stk_messageBox.\r\nThis\scode\sis\sone\sexample\smy\scode\sis\svery\slong\sto\ssubmit\s\shere.\r\n\r\nRegards\r\n\r\nCode\s:\r\n\r\nframe\s.t\r\npack\s.t\r\nset\sreptype\s0\r\nradiobutton\s.t.r1\s-text\s"1"\s-variable\sreptyp\s-value\s1\r\nradiobutton\s.t.r2\s-text\s"2"\s-variable\sreptyp\s-value\s2\r\nradiobutton\s.t.r3\s-text\s"3"\s-variable\sreptyp\s-value\s3\r\nradiobutton\s.t.r4\s-text\s"4"\s-variable\sreptyp\s-value\s4\r\nradiobutton\s.t.r5\s-text\s"5"\s-variable\sreptyp\s-value\s5\r\nradiobutton\s.t.r6\s-text\s"6"\s-variable\sreptyp\s-value\s6\r\n\r\nbind\s.t.r1\s<Double-1>\s{Chk_Alone\s$reptyp}\r\nbind\s.t.r2\s<Double-1>\s{Chk_Alone\s$reptyp}\r\nbind\s.t.r3\s<Double-1>\s{Chk_Alone\s$reptyp}\r\nbind\s.t.r4\s<Double-1>\s{Chk_Alone\s$reptyp}\r\nbind\s.t.r5\s<Double-1>\s{Chk_Alone\s$reptyp}\r\nbind\s.t.r6\s<Double-1>\s{Chk_Alone\s$reptyp}\r\n\r\n\r\ngrid\s.t.r1\r\ngrid\s.t.r2\s\r\ngrid\s.t.r3\r\ngrid\s.t.r4\r\ngrid\s.t.r5\r\ngrid\s.t.r6\r\n\r\nproc\sChk_Alone\s{args}\s{\r\nglobal\sreptyp\r\n\r\n#tk_messageBox\s-message\s"unselected"\r\nafter\sidle\s[list\s.t.r$args\sdeselect]\s\r\nset\sreptyp\s0\r\n}
J foundin 8.6
J is_private 0
J login anonymous
J priority 5\sMedium
J private_contact 457c266b943d7680e10f513f5b080f807997a9aa
J resolution None
J severity Minor
J status Open
J submitter anonymous
J subsystem (unused)
J title Deselect\sradiobutton
J type Bug
K f9116b31ac33bb852fc05a96a5f968a09b818ed3
U anonymous
Z 34155a4707e0a5333510048f00558656