求一个cad lisp一键选取完全相同的图形

软件 2024-04-03

在cad中如何一下就选中同一图层内的所有东西？

1、电脑打开AutoCAD2007版本软件。

2、打开CAD之后，画好图形。

3、画好图形后，鼠标右键点击空白处，然后选择快速选择。

4、进入快速选择页面，特性中选择图层，值中就选择要选中的图层，然后点击确定。

5、点击查找后，如果图层内有东西就可以全部选中了。

求cad编程高手赐个 lisp函数，选中相同的参照块【高分求】

没有真金估计没有人愿意花这个精力去搞的。积分都是浮云。建议自己试试。简单的函数用法什么的没有分回答回答也无所谓。

求autoCAD里相同图形（不是块）批量替换为另一种图形 lisp程序

CAD制图时，需要养成良好的习惯，象这种情况，在制图时应该使用块参考。你现在的情况，使用LISP也很难。毕竟LISP只是程序，这种情况LISP很难判断。

CAD中如何批量替换图形?

CAD是可以批量替换图形的。

具体操作步骤如下：

1、首先在电脑上点击进行打开cad软件，接着在此页面内点击左侧的“扩展工具”选项，然后在弹出来的对话框内点击要进行替换掉的图形或者图案在此举例“沙发”图案。单击“确定”。

2、然后在新的对话框内选择替换后的图形或者图案，在此举例“新沙发”块。单击“确定”。

3、然后就可以看到选中的图案全部被替换掉了。

求一个cad lisp命令！

图层锁定或解锁，代码如下。

;图层锁定及解锁
(defunc:tes(/entlay1)
(vl-load-com)
(while(and(setqent(entsel"\n请选择要锁定或解锁的图元"))(setqlay1(cdr(assoc8(entget(carent))))))
(w1712251lay1)
)
(princ)
)
(defunw1712251(lay1/laylay1)
(vlax-forlay(vla-get-layers(vla-get-activedocument(vlax-get-acad-object)))
(if(=(vla-get-namelay)lay1)
(progn
(if(=(vla-get-locklay):vlax-true);如果图层锁定
(vla-put-locklay:vlax-false);解锁
(vla-put-locklay:vlax-true);锁定
)
)
)
)
)