AutoCADDCL对话框设计示例十

AutoCADDCL对话框设计示例十，代码如下。

dcl:dialog {
    label = "第十个DCL设计" ;
    :boxed_row {
        label = "对象对话框" ;
        :column {
            spacer_0;
            :text {
                alignment = centered ;
                label = "label=Min<<1-20>>Max" ;
            }
            :slider {
                big_increment = 1 ;
                height = 1 ;
                max_value = 20 ;
                min_value = 1 ;
                small_increment = 1 ;
                width = 20 ;
            }
        }
        :image {
            color = 0 ;
            height = 4 ;
            width = 8 ;
        }
    }
    spacer_1;
    ok_cancel;
}

代码完。