求一个lsp源码，可以一键选择某个图层内所有对象并删除，求cadlsp源码，并说明。

lang851 · 发表于 2020-8-22 00:41

lang851 · 发表于 2020-8-31 20:22

(defun C:8 (/ GOP)
(SETQ GOP (SSGET "X" '((-4 . "<OR") (8 . "图层名") (-4 . "OR>"))))
(command "chprop" GOP "" "c" "10" "")
(progn (sssetfirst nil GOP))
(command "ERASE")
(princ)
)
找了半天找的

zzhjxyx · 发表于 2020-8-22 00:41

试试咋样？appload加载，运行stc命令。看看效果。

月黑风高 · 发表于 2020-8-23 22:07

删除实体所在图层不香么？

1354452736 · 发表于 2020-8-25 07:23

cass的删除就是可以选择这样删除啊，不会用cass？

lang851 · 发表于 2020-8-27 15:15

1354452736 发表于 2020-8-25 07:23
cass的删除就是可以选择这样删除啊，不会用cass？

数据量太大，选择太麻烦，图层名还有用。只想清空图层内对象

lang851 · 发表于 2020-8-27 15:16

月黑风高发表于 2020-8-23 22:07
删除实体所在图层不香么？

删除了还要再建，不麻烦？

zhangleiatyc · 发表于 2020-8-28 09:12

特性里面有个快速选择，选择相对应图层的某些特性文件，直接全部删除不好用吗？？？

勘测-黄 · 发表于 2020-8-28 20:45

有源码，说明不是很全面。可行？

勘测-黄 · 发表于 2020-8-28 20:48

一直在用，一键选中该图层，其余图层自动关闭，再一键打开所有图层。

lang851 · 发表于 2020-8-29 02:16

勘测-黄发表于 2020-8-28 20:45
有源码，说明不是很全面。可行？

一键删除指定图层内所有对象吗？

求一个lsp源码，可以一键选择某个图层内所有对象并删除，求cadlsp源码，并说明。

最佳答案

地信元老

地信专家组

名人堂勋章

灌水勋章

宣传勋章