检查是否存在特定的MLEADERSTY
好的,我必须经常清理我们的图形,我们有一些很少使用的多重引线样式。因此,我试图创建一个带有“if”语句的lisp,检查mleaderstyle是否存在。如果它存在,它将继续绘制lisp,但如果它不存在,它将插入一个具有样式的块,然后继续其余的操作。有谁能帮我举一个if语句的例子来解决这个问题吗?
我已经搜索了很长时间,但几乎没有成功。
谢谢你,
J 可能是这样的:
(defun LM:MLeaderStylep ( style )
(and
(setq dict (dictsearch (namedobjdict) "ACAD_MLEADERSTYLE"))
(dictsearch (cdr (assoc -1 dict)) style)
)
)
如果style参数是MLeaderStyle,则返回T,否则返回nil。
(LM:MLeaderStylep "Standard")
页:
[1]