谢谢你的提问。。。我试图了解一些函数是如何工作的,或者是否有一种替代方法。我只在另一个线程中做,不混合的问题。
还记得你帮我的那根线吗?(细节)
有9个toggle_按钮,因为它们一起工作,有如何获得当前选择哪一个?例如:rbx返回选中的单选按钮数。。。rb1、rb2或rb9。
DCL:
- Deti : dialog { //dialog name
- label = "Detalhamento de instalação" ; //give it a label
- : row { //*define row
- :boxed_radio_column { //define radio column
- label = "Ti&po:" ; //give it a label
- : radio_button { //define radion button
- key = "rb1" ; //give it a name
- label = "&C" ; //give it a label
- value = "1" ; //switch it on
- is_enabled = true ;
- } //end definition
- : radio_button { //define radio button
- key = "rb2" ; //give it a name
- label = "&E" ; //give it a label
- } //end definition
- : radio_button { //define radion button
- key = "rb3" ; //give it a name
- label = "&X" ; //give it a label
- } //end definition
- : radio_button { //define radio button
- key = "rb4" ; //give it a name
- label = "L&B" ; //give it a label
- } //end definition
- : radio_button { //define radio button
- key = "rb5" ; //give it a name
- label = "L&L" ; //give it a label
- } //end definition
- : radio_button { //define radio button
- key = "rb6" ; //give it a name
- label = "L&R" ; //give it a label
- } //end definition
- : radio_button { //define radion button
- key = "rb7" ; //give it a name
- label = "&T" ; //give it a label
- } //end definition
- : radio_button { //define radion button
- key = "rb8" ; //give it a name
- label = "BR" ; //give it a label
- } //end definition
- : radio_button { //define radion button
- key = "rb9" ; //give it a name
- label = "LUR" ; //give it a label
- } //end definition
- : boxed_row {
- label = "Sobe / Desce" ;
- :toggle {
- alignment = centered ;
- label = "&Sobe" ;
- key = "tog1" ;
- value = "0" ;
- }
- :toggle {
- alignment = centered ;
- label = "&Desce" ;
- key = "tog2" ;
- value = "0" ;
- }
- }
- } //end radio column
- : boxed_column { //*define boxed column
- label = "Bitol&a" ; //*give it a label
- : popup_list { //*define popup list
- alignment = centered;
- key = "Bitolas" ; //*give it a name
- value = "1" ; //*initial value
- } //*end list
- :image {height = 3; width = 0;aspect_ratio=0.8;color=0;fixed_height=true;key = "img";}
-
- } //*end boxed column
- } //*end row
-
- ok_cancel ; //predifined OK/Cancel
- : row { //define row
- : image { //define image tile
- key = "im" ; //give it a name
- height = 1.0 ; //and a height
- width = 2.0 ; //and now a width
- } //end image
- : paragraph { //define paragraph
- : text_part { //define text
- label = "Elaborado por:" ; //give it some text
- } //end text
- : text_part { //define more text
- label = "José Roberto dos Santos Junior."; //some more text - Credits to Kenny Ramage
- } //end text
- } //end paragraph
- } //end row
- } //end dialog
要启动该代码(Deti),如果您没有选择任何单选按钮获取一个错误,这两个操作都不起作用:
DCL:is_enabled-仅用点图像填充单选按钮;
LISP:(set_tile“rb1”“1”)-什么也不做。
如果可能的话,我试图“强制”代码选择第一个单选按钮作为之前的选择。 |