CH 选物变图层

MZ_li

看来你是真缺币啊

xyp1964

1. (defun c:tt ()
   
2.   "图层刷"
   
3.   (while (and (setq s1 (car (entsel "\n选择样板图层<退出>: ")))
   
4.               (setq ss (ssget))
   
5.          )
   
6.     (setq la (cdr (assoc 8 (entget s1))))
   
7.     (command "chprop" ss "" "la" la "")
   
8.   )
   
9.   (princ)
   
10. )
    

(defun c:tt ()<br />   "图层刷"<br />   (while (and (setq s1 (car (entsel "\n选择样板图层<退出>: ")))<br />               (setq ss (ssget))<br />          )<br />     (setq la (cdr (assoc 8 (entget s1))))<br />     (command "chprop" ss "" "la" la "")<br />   )<br />   (princ)<br /> )<br />

caoyongjun

muai2010 发表于 2024-8-3 10:03
最好上个演示图比较好把

可以将图元的图层转成别的图层，比如1层的图元转成2层，就可以用这个，2层的确定可以用选择是2层上的图元，或者直按输入图层名就可以达到，将1层上的图元转成2层，没有白要大家的币。

muai2010

最好上个演示图比较好把

gble119

截图也不给一个。

caoyongjun

muai2010 发表于 2024-8-3 10:03
最好上个演示图比较好把

可以将图元的图层转成别的图层，比如1层的图元转成2层，就可以用这个，2层的确定可以用选择是2层上的图元，或者直按输入图层名就可以达到，......

ketxu

谢谢分享，不过如果只是像标题那样的功能，确实没那么有趣

15623788285

最好上个演示图比较好把

caoyongjun

15623788285 发表于 2024-9-5 11:54
最好上个演示图比较好把

功能是选择要变动图层的图元，然后再选择你所要的图层（选你所要的图层上的任意图元即可实现）

caoyongjun

muai2010 发表于 2024-8-3 10:03
最好上个演示图比较好把

功能是选择要变动图层的图元，然后再选择你所要的图层（选你所要的图层上的任意图元即可实现）