AutoCADDCL对话框设计示例四

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

dcl:dialog {
    label = "第四个DCL对话框" ;
    :text {
        alignment = centered ;
        label = "这是一个文本框" ;
    }
    :row {
        :edit_box {
            edit_width = 10 ;
            label = "图名" ;
        }
        :edit_box {
            edit_width = 10 ;
            label = "日期" ;
        }
    }
    ok_cancel;
}

代码完。