1078815748
发表于 2011-3-29 10:34:00
xxyyzzlg
发表于 2024-7-3 13:39:30
Gu_xl 发表于 2011-3-29 19:24
回复 1078815748 的帖子
感谢，代码很实用。解决了我的自动创建标注样式调用自定义箭头问题
zlg258369
发表于 2011-3-29 11:15:35
"CIR" 块名称哪来的
就这么写
qingxiji
发表于 2011-3-29 12:18:30
不懂，了解一下....
1078815748
发表于 2011-3-29 14:02:50
1078815748
发表于 2011-3-29 14:57:01
Gu_xl
发表于 2011-3-29 16:59:25
回复 1078815748 的帖子
先把块插进来！
1078815748
发表于 2011-3-29 19:17:55
Gu_xl
发表于 2011-3-29 19:24:12
本帖最后由 Gu_xl 于 2011-3-30 09:03 编辑
回复 1078815748 的帖子
(defun c:tt ()
(if (not (tblsearch "block" "CIR"))
(command "insert" "C:\\HZ\\block\\CIR.DWG" '(0 0 0) 1 1 0)
)
(entdel (entlast))
(SETVAR "DIMBLK" "CIR")
)
zlg258369
发表于 2011-3-29 20:12:41
1078815748
发表于 2011-3-30 08:50:26