evayleung
发表于 2018-6-25 13:32:46
用0层做块,块内的东西颜色就会随原图层,如果用其他层做块,块内的图元颜色可能随了这个图层,就会不一样了。
Melancholier
发表于 2018-6-25 14:28:43
evayleung 发表于 2018-6-25 13:32
用0层做块,块内的东西颜色就会随原图层,如果用其他层做块,块内的图元颜色可能随了这个图层,就会不一样 ...
我是设备专业,块是建筑专业已经做好了,我就想一键修改到位,不改图层。已经找到了命令SETBYLAYER,但是直接用起来操作比较繁琐,我又不大会用lisp编程
evayleung
发表于 2018-6-25 16:57:13
Melancholier 发表于 2018-6-25 14:28
我是设备专业,块是建筑专业已经做好了,我就想一键修改到位,不改图层。已经找到了命令SETBYLAYER,但是 ...
你看看这样能否满足你要求,就简单写两句,太深奥的我也不懂得。{:1_1:}
[*](defun c:tt (/ ss)
[*](setvar "CMDECHO" 0)
[*](command "UNDO" "be")
[*](setq ss (ssget "_X" '((0 . "INSERT"))))
[*](command "_.SETBYLAYER" ss "" "Y" "Y")
[*](command "UNDO" "e")
[*])
Melancholier
发表于 2018-6-26 13:12:32
evayleung 发表于 2018-6-25 16:57
你看看这样能否满足你要求,就简单写两句,太深奥的我也不懂得。
[*](defun c:tt (/ ss)
虽然没达到我要的效果,但是还是谢谢你的帮助
taoyi0727
发表于 2018-6-26 14:20:20
本帖最后由 taoyi0727 于 2018-6-26 14:32 编辑
用G版代码改的
yangchao2005090
发表于 2019-8-14 11:29:20
Gu_xl 发表于 2018-6-14 10:35
顾老,请问一下这种属性块如何实现呀
sunny_8848
发表于 2021-1-19 09:12:22
谢谢分享,先标记下
pitnet
发表于 2022-4-3 13:20:15
taoyi0727 发表于 2018-6-26 14:20
用G版代码改的
非常感谢,非常好用.
magicheno
发表于 2022-4-4 14:50:54
学习了~~~~~
weijiewen
发表于 2023-3-25 17:12:07
taoyi0727 发表于 2018-6-26 14:20
用G版代码改的
感谢,已经使用~