BoKirra
2007-10-26, 10:27 AM
Hi ALL,
Can anyone solve this DCL problem? Any help would be appreciated.
I would like to give different options to a single radio button.
What I am thinking is that a "IF" condition statement would solve the problem.
I have tried but with no success.
There are two BUTTONS labeled as "Job_01" & "Job_02" in the dialog box.
Select Job_01 BUTTON & Radio Button labeled as "Selection_01" will do task as follows:
(action_tile "Radio_Button_01" ; labeled as Selection_01
"(setq Selection $key)
(mode_tile \"Edit_Box_01\" 0)
(mode_tile \"Edit_Box_02\" 0)
(mode_tile \"Edit_Box_03\" 0)
(mode_tile \"Edit_Box_04\" 1)
(mode_tile \"Edit_Box_05\" 1)"
)
Select Job_02 BUTTON & Radio Button labeled as "Selection_01" will do task as follows:
(action_tile "Radio_Button_01" ; labeled as Selection_01
"(setq Selection $key)
(mode_tile \"Edit_Box_01\" 1)
(mode_tile \"Edit_Box_02\" 1)
(mode_tile \"Edit_Box_03\" 1)
(mode_tile \"Edit_Box_04\" 0)
(mode_tile \"Edit_Box_05\" 0)"
)
I have no problems with Radio Buttons labeled as "Selection_02" & "Selection_03".
Radio Buttons labeled as "Selection_02" & "Selection_03" will associate with other tasks.
The following is the DCL file:
FirstRoutine : dialog {
label = "First Routine";
children_alignment = top;
: row {
: column {
: boxed_column {
label = "Jobs";
: button {
key = "Job_01";
label = "Job_01";
}
: button {
key = "Job_02";
label = "Job_02";
}
} //end of boxed_column
: boxed_column {
label = "Selections";
: radio_button {
key = "Radio_Button_01";
label = "Selection_01";
}
: radio_button {
key = "Radio_Button_02";
label = "Selection_02";
}
: radio_button {
key = "Radio_Button_03";
label = "Selection_03";
}
} //end of boxed_column
} // end of column
: boxed_column {
:text { label = "Dimension_01:";}
: edit_box { alignment = left;
edit_width=10;
key = "Edit_Box_01";
}
:text { label = "Dimension_02:";}
: edit_box { alignment = left;
edit_width=10;
key = "Edit_Box_02";
}
:text { label = "Dimension_03:";}
: edit_box { alignment = left;
edit_width=10;
key = "Edit_Box_03";
}
:text { label = "Dimension_04:";}
: edit_box { alignment = left;
edit_width=10;
key = "Edit_Box_04";
}
:text { label = "Dimension_05:";}
: edit_box { alignment = left;
edit_width=10;
key = "Edit_Box_05";
}
} //end of column
} //end of row
:row { alignment = centered; fixed_height = true;
fixed_width = true;
ok_cancel;
} //end of row
} // end of FirstRoutine
Can anyone solve this DCL problem? Any help would be appreciated.
I would like to give different options to a single radio button.
What I am thinking is that a "IF" condition statement would solve the problem.
I have tried but with no success.
There are two BUTTONS labeled as "Job_01" & "Job_02" in the dialog box.
Select Job_01 BUTTON & Radio Button labeled as "Selection_01" will do task as follows:
(action_tile "Radio_Button_01" ; labeled as Selection_01
"(setq Selection $key)
(mode_tile \"Edit_Box_01\" 0)
(mode_tile \"Edit_Box_02\" 0)
(mode_tile \"Edit_Box_03\" 0)
(mode_tile \"Edit_Box_04\" 1)
(mode_tile \"Edit_Box_05\" 1)"
)
Select Job_02 BUTTON & Radio Button labeled as "Selection_01" will do task as follows:
(action_tile "Radio_Button_01" ; labeled as Selection_01
"(setq Selection $key)
(mode_tile \"Edit_Box_01\" 1)
(mode_tile \"Edit_Box_02\" 1)
(mode_tile \"Edit_Box_03\" 1)
(mode_tile \"Edit_Box_04\" 0)
(mode_tile \"Edit_Box_05\" 0)"
)
I have no problems with Radio Buttons labeled as "Selection_02" & "Selection_03".
Radio Buttons labeled as "Selection_02" & "Selection_03" will associate with other tasks.
The following is the DCL file:
FirstRoutine : dialog {
label = "First Routine";
children_alignment = top;
: row {
: column {
: boxed_column {
label = "Jobs";
: button {
key = "Job_01";
label = "Job_01";
}
: button {
key = "Job_02";
label = "Job_02";
}
} //end of boxed_column
: boxed_column {
label = "Selections";
: radio_button {
key = "Radio_Button_01";
label = "Selection_01";
}
: radio_button {
key = "Radio_Button_02";
label = "Selection_02";
}
: radio_button {
key = "Radio_Button_03";
label = "Selection_03";
}
} //end of boxed_column
} // end of column
: boxed_column {
:text { label = "Dimension_01:";}
: edit_box { alignment = left;
edit_width=10;
key = "Edit_Box_01";
}
:text { label = "Dimension_02:";}
: edit_box { alignment = left;
edit_width=10;
key = "Edit_Box_02";
}
:text { label = "Dimension_03:";}
: edit_box { alignment = left;
edit_width=10;
key = "Edit_Box_03";
}
:text { label = "Dimension_04:";}
: edit_box { alignment = left;
edit_width=10;
key = "Edit_Box_04";
}
:text { label = "Dimension_05:";}
: edit_box { alignment = left;
edit_width=10;
key = "Edit_Box_05";
}
} //end of column
} //end of row
:row { alignment = centered; fixed_height = true;
fixed_width = true;
ok_cancel;
} //end of row
} // end of FirstRoutine