修改引线箭头样式
请问怎么用lisp实现以下步骤:1.图中现有最后生成的引线一根,箭头样式为: "."
2.选中该引线
3.在特性里手动修改箭头样式为: "小点" or "DotSmall"
4.结束
恳请高手指教!~~~
万分感谢!
祝:新年洋洋得意,喜气洋洋~
大过年的，拿了一半家当出来……不容易啊~~~
(defun c:tt ()
(setq od (getvar "dimstyle"))
(setvar "dimsah" 1)
(setvar "dimblk1" "_dotsmall");箭头1
(setvar "dimblk2" "_dotsmall");箭头2
(command "_.dimstyle" "a" (entlast) "")
(command "_.dimstyle" "r" od)
) 本帖最后由 菜卷鱼 于 2015-2-25 13:50 编辑
引线标注之前可以设置：
(setvar 'dimldrblk "小点")
(setvar 'dimldrblk ".")
(setvar 'dimldrblk "空心闭合")
。。。。。。。。。。。。。。
页:
[1]