如何建立二级标注样式?
(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 于 2011-3-12 08:48 编辑
这个用Lisp是可以做到的,请先看下下面的这篇文章,
AutoLisp用DXF组码生成标注样式(标注文字样式、标注箭头样式)方法
在此给出一样例,分别设置了各二级样式的箭头。
建立二级标注样式其关键在于组码:(2 . "标注样式名称")中的标注样式名称设置,二级标注名称在主标注样式名称后加$0~$7。
STANDARD 主标注
STANDARD$1 线性标注
STANDARD$2 角度标注
STANDARD$3 半径标注
STANDARD$4 直径标注
STANDARD$5 坐标标注
STANDARD$6 引线和公差 是呀,觉得用lisp程序不行,只能在对话框中改。比如我想让线性尺寸标注的端部用短斜线,而直径等用箭头。请高手指导。 支持下 谢谢学习了,最近搞这个东西 xq4u 发表于 2011-3-11 22:39
这个用Lisp是可以做到的,请先看下下面的这篇文章,
AutoLisp用DXF组码生成标注样式(标注文字样式、标注 ...
为什么用不了?
页:
[1]