Back to Model....
DCL Model - DCL Coding
lisp51 : dialog { //dialog name
label = "Pipe Bends" ; //give it a label
: row { //define a row
children_alignment = top ; //align to top
: popup_list { //define list box
key = "lb1" ; //give it a name
} //end list box
: radio_column { //define radio column
label = "Radius :"; //give it a label
: radio_button { //define radio button
label = "Long" ; //give it a label
key = "rb1" ; //give it a name
} //end radio button
: radio_button { //define radio button
label = "Medium"; //give it a label
key = "rb2" ; //give it a name
} //end radio button
: radio_button { //define radio button
label = "Short"; //give it a label
key = "rb3" ; //give it a name
} //end radio button
} //end radio column
} //end row
spacer ; //add a space
: edit_box { //define edit box
key = "eb1" ; //give it a name
label = "Pipe Schedule :" ; //give it a label
} //end edit box
spacer ; //add a space
ok_cancel ; //predefined OK/Cancel button
} //end dialog
|