社区 › AutoCAD工具插件 › 设置了多个图层。如何做到把对象置入图层的时候颜色不变化？

chenry676 发表于 2023-11-25 11:25:29

设置了多个图层。如何做到把对象置入图层的时候颜色不变化？

本帖最后由 chenry676 于 2023-11-25 11:31 编辑

设置了多个图层。如何做到选图元改到当前层（把对象置入图层的时候颜色不变化。

tigcat 发表于 2023-11-25 13:12:08

先用程序把图元颜色改为对应的颜色，再移动到目标图层

zilong136 发表于 2023-11-25 22:46:53

改图元前，先把图元的颜色改好（只要不是随层就行了）

bonny 发表于 2023-11-25 22:59:09

(defun c:tt (/ doc la)
        (if (and (ssget)
                                (setq doc (vla-get-ActiveDocument (vlax-get-acad-object)))
                                (setq la (vla-get-Name(vla-get-ActiveLayer doc)))
                        )
                (progn
                        (vlax-for e (vla-get-activeselectionset doc)
                                (if (= 256 (vla-get-Color e))
                                        (vla-put-Color e (vla-get-Color (vla-Item (vla-get-Layers doc)(vla-get-Layer e))))
                                )
                                (vla-put-Layer e la)
                        )
                )
        )
)

chenry676 发表于 2023-11-26 09:32:35

bonny 发表于 2023-11-25 22:59


好象可以了，十分感谢！:handshake

zilong136 发表于 2023-12-31 04:23:35

bonny 发表于 2023-11-25 22:59


这个就是把对象改为当前图层【不变色】，CAD默认这个命令会改变随层的颜色。
但我在刚才的测试过遇到你这个插件无效的情况，刚开始好好的，可以直接改，后来用着用着命令就无效了，重启CAD重新加载又好了，不知道什么情况。

yefei812678 发表于 2024-1-26 10:08:30

6楼说的对 支持

查看完整版本: 设置了多个图层。如何做到把对象置入图层的时候颜色不变化？