如何建立二级标注样式？

小妹丁

(entmake (list '(0 . "DIMSTYLE")
   '(100 . "AcDbSymbolTableRecord")
   '(100 . "AcDbDimStyleTableRecord")
   '(70 . 0)
                 (cons 340 (tblobjname "style" "中文"))      ;文字样式名
   (cons 2 "普通螺纹") ;标注样式名
   '(3 . "M<>")  ;标注前缀
   '(40 . 0.0)  ;标注特征比例，缩放到布局
   '(41 . 2.5)  ;箭头尺寸
   '(42 . 1.5)  ;起点偏移量
   '(43 . 5.5)  ;基线间距
   '(44 . 1.5)  ;超出尺寸线
   '(47 . 0.000)  ;上偏差
   '(48 . 0.000)  ;下偏差
   '(71 . 0)  ;公差无
                 '(77 . 1)              ;文字在尺寸线上方
   '(74 . 1)  ;
   '(140 . 3.0)  ;文字高度
   '(141 . -2.5)  ;圆心标记
   '(144 . 1.0)  ;测量比例单位
   '(146 . 0.7)  ;公差高度比例
   '(147 . 1.0)  ;文字从尺寸线偏移
   '(172 . 2)             ;尺寸界线间连线
   '(176 . 256)  ;随层
   '(177 . 256)  ;随层
   '(178 . 256)  ;随层
   '(271 . 3)  ;尺寸标注精度
   '(272 . 3)  ;公差标注精度
   '(275 . 0)  ;角度标注制式，十进制。
   '(288 . 1)  ;手动放置尺寸   
    )
上面只能建立第一级标注样式，
但要建立第二级还没搞清楚，请指导下。

xq4u

这个用Lisp是可以做到的，请先看下下面的这篇文章，
AutoLisp用DXF组码生成标注样式（标注文字样式、标注箭头样式）方法
在此给出一样例，分别设置了各二级样式的箭头。
建立二级标注样式其关键在于组码：(2 . "标注样式名称")中的标注样式名称设置，二级标注名称在主标注样式名称后加$0~$7。

ZZXXQQ

STANDARD                     主标注
STANDARD$1                 线性标注
STANDARD$2                 角度标注
STANDARD$3                 半径标注
STANDARD$4                 直径标注
STANDARD$5                 坐标标注
STANDARD$6                 引线和公差

zhouyxcs

是呀，觉得用lisp程序不行，只能在对话框中改。比如我想让线性尺寸标注的端部用短斜线，而直径等用箭头。请高手指导。

jyzas

支持下

zhangcan0515

谢谢学习了，最近搞这个东西

cadm0211

xq4u 发表于 2011-3-11 22:39
这个用Lisp是可以做到的，请先看下下面的这篇文章，
AutoLisp用DXF组码生成标注样式（标注文字样式、标注 ...

为什么用不了？