如何通过颜色控制图层呢
请问，如何根据当前颜色自动切换图层，就是说当前颜色如果是红色时，在绘制的时候就自动将绘制好的图样归到某个预设好的图层里，不知道可不可以实现，请教各位啦，谢谢本帖最后由 yxp 于 2018-12-27 13:37 编辑
一般不这么做，因为对象自动归到某图层需要使用对象编辑反应器，监视对象的颜色改变，再修改对象的图层。图层的修改将会引起编辑反射，又会产生一个回调，所以编辑反应器有点不好搞。(defun c:changec()(if (null (tblsearch "layer" "redLayer"))(command "-layer" "n" "redLayer" ""))
(setq obj (vlax-ename->vla-object (car (entsel))))
(setq objReactor (vlr-object-reactor (list obj) "colorReact" '((:vlr-objectClosed . modeifObj))))
(princ)
)
(defun modeifObj(a b c)
(if (= (vla-get-Color a) 1)(alert "修改颜色为红色"))
)
可以简化一下，编写一个简单的lisp，运行这个lisp将默认选择所有对象，再逐一分析对象的颜色，归到某个图层。
谢谢解答，原来是我想多啦，哈
页:
[1]