颜色？

xiaoliu · 发表于 2004-3-3 21:40:00

大家帮忙看看这句话为什么修改不了实体的颜色呢
(setq e1 (entget e))
(subst (list 62 2) (assoc 62 e1) e1)
(redraw e 1)

王咣生 · 发表于 2004-3-3 21:49:00

这样呢?

(setq e1 (entget e))
(setq e1 (subst (cons 62 2) (assoc 62 e1) e1))
(entmod e1)

meflying · 发表于 2004-3-3 21:50:00

有很多原因

1、要使用(cons 62 2)而不能用LIST

2、可能的原因，就是原来的颜色是默认，在组码中就不会出现，因此你就不能替换，而必须使用添加(append (cons 62 2) e1)，所以你要先判断一下，有就用你的，没有就用上面的

3、做完之后要回传给e1，否则e1就没有任何改变，你也就白做了(setq e1 (append ...))或(setq e1 (subst ...))

4、修改完组码之后要修改对象，否则你仅仅是修改了一个变量e1，跟对象没有任何关系，要使用(entmod e1)

liuqian020 · 发表于 2004-3-3 21:54:00

不知你具体要做什么(redraw)换(entmod)试试

xiaoliu · 发表于 2004-3-3 21:56:00

非常感谢各位，问题已解决

liuqian020 · 发表于 2004-3-3 21:57:00

对不起打错了是entmod

账号		自动登录	找回密码
密码			注册

颜色？

回复