明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 2141|回复: 2

报错啊!求助!

[复制链接]
发表于 2012-4-26 00:20:56 | 显示全部楼层 |阅读模式
这个dcl文件内每个对话框都提示报错,不知道具体哪里错了。恳请高手指教!
代码如下,比较长。
dcl_settings : default_dcl_settings { audit_level = 3; }
spec_tion :dialog {
label = "图 纸 说 明";
:edit_box {
    label        ="项目名称:";
    key="help_1";
    edit_width =35;
    allow_accept=true;
  }
:edit_box {
    label        ="设计分项:";
    key="help_2";
    edit_width =35;
    allow_accept=true;
  }
:edit_box {
    label        ="设备名称:";
    key="help_3";
    edit_width =35;
    allow_accept=true;
  }
:row {
   :edit_box {
     label        ="设计阶段:";
     key="help_4";
     edit_width =10;
     allow_accept=true;
   }
   : edit_box {
     label        ="设备图号:";
     key="help_5";
     edit_width =10;
     allow_accept=true;
   }
}
:row {
   : edit_box {
     label        ="设计人:";
     key="help_6";
     edit_width =10;
     allow_accept=true;
   }
   : edit_box {
     label        ="校核人:";
     key="help_7";
     edit_width =10;
     allow_accept=true;
   }
}
   : edit_box {
     label        ="其它说明:";
     key="help_8";
     allow_accept=true;
   }
:row {
:button {
    key = "load";
    label=" Load ";
    fixed_width=true;
}
:button {
    key = "save";
    label=" Save ";
    fixed_width=true;
}
ok_cancel;
}
}

chg_table :dialog {
label = "图 纸 目 录";
children_alibnment=left;
:row {
  :list_box {
    label= "图形文件名";
    key="text_lt";
    width= 12;
    height=14;
   }
  :column{
   :boxed_column {
     label="图纸目录内容";
   : edit_box {
     label        ="图形文件名:";
     fixed_width=true;
     key="text_0";
     edit_width =10;
   }
   : edit_box {
     label        ="图名:";
     key="text_1";
     edit_width =27;
   }
   : edit_box {
     label        ="图号:";
     key="text_2";
     edit_width =20;
     fixed_width=true;
   }
   :row {
     fixed_width=true;
   : edit_box {
     label        ="图幅:";
     key="text_3";
     edit_width =6;
     fixed_width=true;
   }
:row {
   : edit_box {
     label        ="比例:";
     key="text_4";
     edit_width =8;
     fixed_width=true;
   }
   : edit_box {
     label        ="序号:";
     key="text_5";
     edit_width =3;
     fixed_width=true;
   }
}

  }
  :row {
  : button {
     label           = "更新/增加";
     key             = "chage";
  }
  : button {
     label           = "删除";
     key             = "remove";
  }
  : button {
     label           = "列目录";
     key             = "list_dat";
  }
}
}
  :row {
  spacer_1;
  ok_cancel;
  }
}
}
spacer_1;
}

list_dwgfile :dialog {
label = "图形文件目录";
  :list_box {
    key="dwg_list";
    //width=10;
    //height=10;
   }
spacer_1;
ok_cancel;
}




chg_config :dialog {
label = "数 据 库 配 置";
  :edit_box {
    label="图库所在盘:";
    key="dwg_disk";
    edit_width=14;
  }
  :edit_box {
    label="检索库所在盘:";
    key="lib_disk";
    edit_width=14;
  }
ok_cancel_help;
}

sb_diff_no :dialog{
label="设备专业图纸分类";
  :list_box {
    label = "设备分类一览表:";
    key="sb_dif_list";
    width=40;
    //height=10;
   }
  : button {
     label           = " 添加数据 ";
     key             = "add_it";
     width=8;
     fixed_width=true;
  }
:boxed_row {
  :edit_box {
   label = "分类号:";
   key = "dif_nob";
   edit_width=4;
   fixed_width=true;
  }
  :edit_box {
   label = "分类名:";
   key = "dif_nam";
   edit_width=14;
   fixed_width=true;
  }
}
ok_cancel;
}
table_list :dialog {
label = "图 纸 档 案 卡";
:column {
   :text {
     label="错误信息:        ";
     key="error_text";
     }
  :boxed_radio_row {
   //fixed_width=true;
   :text {
     label="文件名:          ";
     key="text_0";
     }
    :radio_button { key = "t_n";}
     }
   :boxed_radio_row {
   :edit_box {
     label        ="图名:";
     key="text_1";
     edit_width =27;
     fixed_width=true;
   }
   :radio_button { key = "t_1";}
   }
  :boxed_radio_row{
   fixed_width=true;
  :edit_box {
     label        ="图号:";
     key="text_2";
     edit_width =20;
     edit_limit=10;
     fixed_width=true;
   }
   :radio_button { key = "t_2";}
   }

   :row {
     fixed_width=true;
   : edit_box {
     label        ="图幅:";
     key="text_3";
     edit_width =3;
     edit_limit=8;
     fixed_width=true;
   }
   }
   :boxed_radio_row{
   :edit_box {
     label        ="比例:";
     key="text_4";
     edit_width =6;
     edit_limit=8;
     fixed_width=true;
   }
  :radio_button { key = "t_3";}
   }
   :row {
       :edit_box {
         label        ="序号:";
         key="text_5";
         edit_width =3;
         edit_limit=3;
         fixed_width=true;
       }
  }
  ok_cancel;
  spacer_1;
  }
}

error_tl :dialog {
label="警 告 !";
:text{
width=40;
key="masg";
}
ok_cancel;
}

input_dl :dialog {
label="输 入 文 件 名";
:edit_box{
key="name";
width=10;
edit_limit = 8;
}
ok_button;
}

get_subdir :dialog {
label="提取图形文件";
:edit_box {
   label="存放目录:";
   key="cur_dir";
   width=30;
   fixed_width=true;
}
:row {
:list_box {
   label="目录:";
   key="dir_list";
  //width = 10;
   //height = 10;
   fixed_width=true;
}
spacer_1;
:list_box {
   label="文件:";
   key="get_filed";
   //width = 10;
   //height = 10;
   fixed_width=true;
}
spacer_1;
:column {
     spacer_1;
     :button {
        label= "提图...";
        key= "get_dwg";
        fixed_width=true;
      }
      ok_button;
}
}
spacer_1;
}

engin_no :dialog{
label="工 程 图 纸 分 类 号";
  :list_box {
    label = "库存图分类一览表:";
    key="sb_dif_list";
    width=60;
    //height=10;
   }
:row {
  fixed_width=true;
  :edit_box {
   label = "分类号:";
   key = "dif_nob";
   edit_width=4;
   fixed_width=true;
  }
  :edit_box {
   label = "分类名:";
   key = "dif_nam";
   edit_width=14;
   fixed_width=true;
  }
}
:row {
  spacer_1;
  : button {
     label           = "索引....";
     key             = "disc_it";
     fixed_width=true;
  }
  spacer_1;
: button {
     label           = "添加分类";
     key             = "add_it";
     fixed_width=true;
  }
  spacer_1;
ok_cancel;
}
}
process_no :dialog{
label="专 业 分 类";
  :list_box {
    label = "专业分类一览表:";
    key="sb_dif_list";
    width=40;
    //height=10;
   }
  : button {
     label           = "添加分类";
     key             = "disc_it";
     width=8;
     fixed_width=true;
  }
:boxed_row {
  :edit_box {
   label = "分类号:";
   key = "dif_nob";
   edit_width=4;
   fixed_width=true;
  }
  :edit_box {
   label = "分类名:";
   key = "dif_nam";
   edit_width=14;
   fixed_width=true;
  }
}
ok_cancel;
}
提示错误:

acad.dce里的错误提示是这样的:
====== D:/Program Files/AutoCAD 2004/$vld$.dcl 的 DCL 语义检核  ======

警告 在“table_list”中。(widget 类型 = radio_button, key = “t_n”)
    单选钮的父控件必须是一个单选钮簇。

警告 在“table_list”中。(widget 类型 = radio_button, key = “t_1”)
    单选钮的父控件必须是一个单选钮簇。

警告 在“table_list”中。(widget 类型 = radio_button, key = “t_2”)
    单选钮的父控件必须是一个单选钮簇。

警告 在“table_list”中。(widget 类型 = radio_button, key = “t_3”)
    单选钮的父控件必须是一个单选钮簇。
请高手指教。。。。。。。。。。。。。

发表于 2012-4-26 09:03:32 | 显示全部楼层

  1. table_list :dialog {
  2. label="图 纸 档 案 卡";
  3. :text{label="错误信息:        ";key="error_text";}
  4. :boxed_row
  5.   :text{label="文件名:          ";key="text_0";}
  6.   :toggle{key="t_n";}
  7. }
  8. :boxed_row{
  9.   :edit_box{label="图名:";key="text_1";edit_width =27;fixed_width=true;}
  10.   :toggle{key="t_1";}
  11. }
  12. :boxed_row{
  13.   fixed_width=true;
  14.   :edit_box{label="图号:";key="text_2";edit_width =20;edit_limit=10;fixed_width=true;}
  15.   :toggle{key="t_2";}
  16. }
  17. :row{
  18.   fixed_width=true;
  19.   :edit_box{label="图幅:";key="text_3";edit_width=3;edit_limit=8;fixed_width=true;}
  20. }
  21. :boxed_row{
  22.   :edit_box{label="比例:";key="text_4";edit_width=6;edit_limit=8;fixed_width=true;}
  23.   :toggle{key="t_3";}
  24. }
  25. :row{
  26.   :edit_box{label="序号:";key="text_5";edit_width=3;edit_limit=3;fixed_width=true;}
  27. }
  28. ok_cancel;
  29. spacer_1;
  30. }
 楼主| 发表于 2012-4-26 10:30:59 | 显示全部楼层
ZZXXQQ 发表于 2012-4-26 09:03

解决了!!!!太谢谢你了。大侠。
实在是高手。。。好激动啊。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2025-12-17 04:16 , Processed in 0.215179 second(s), 30 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表