AutoCADDCL对话框设计示例七,代码如下。

dcl:dialog {
    label = "第七个DCL设计" ;
    :row {
        :list_box {
            height = 5 ;
            label = "列表" ;
            list = "北京\n上海\n天津\n重庆\n香港\n澳门\n台湾\n郑州\n开封\n武汉" ;
            width = 10 ;
        }
        :boxed_radio_column {
            label = "字高" ;
            :radio_button {
                label = "10" ;
                value = "1" ;
            }
            :radio_button {
                label = "20" ;
            }
            :radio_button {
                label = "30" ;
            }
            :radio_button {
                label = "40" ;
            }
            :text {
                label = "设计者:shusheng" ;
            }
            :text {
                label = "日期:2011/04/16" ;
            }
        }
    }
    spacer_1;
    ok_only;
}

代码完。