cad lisp编程如何用lisp实现如图层一到二十，把全部图层变成8号色然后其中的某个图层为红色

点击联系发帖人 时间：2020-04-20 07:37

calis

你对这个回答的评价是

下载百喥知道APP，抢鲜体验

使用百度知道APP立即抢鲜体验。你的手机镜头里或许有别人想知道的答案

}

不知道是不是你需要的

对象的圖层；(setvar "clayer" "图层");设置这个图层为当前，然后逐个关闭其它的图层

是不是通过选取图元，其所在图层是打开

的未选到的图元其所在图层就闭關。如果是这样请试用下面两程序。

;;选取图元关闭其所在图层之外的所有图层

;;打开闭关的所有图层

下载百度知道APP，抢鲜体验

使用百度知道APP立即抢鲜体验。你的手机镜头里或许有别人想知道的答案

}

这个挺容易的先用ssget创建个选择集，然后用循环提取图层

提取图层后再把它输出成清单就好了

能否帮忙写一下呢我不会写LISP程序。非常需要啊谢谢了兄弟

需要有对应关系吗？“输出清单”清单是什么样的清单输出到命令行提示，还是输出成文本文件什么的
帮你没有问题，但你需要把问题描述得很清楚
这样可以给双方省下很多时间。

你对这个回答的评价是

下载百度知道APP，抢鲜体验

使用百度知道APP立即抢鲜体验。你的手机镜头里或許有别人想知道的答案

}