如何用其他颜色填充三维实体？

jjww123

如题。。。

& g( j+ h' V# o/ p1 x) lThisDrawing.SendCommand "_shademode" + vbcr_gouraud + vbCr
- l7 I+ f2 }. I/ I! G
9 Q3 Q) p" O3 x这个方法填充只是黑色。。。

woaishuijia

SendCommand方法是向CAD命令行发送键盘命令，从而调用CAD图形界面的命令。
CAD图形界面的shademode命令是2006及以前版本的“着色模式”命令，是用来控制图形的显示模式的，并不改变图形对象的颜色。
: @4 x& B& x! P1 a, m! ?% _  F5 s如果你的三维实体对象的颜色是黑色的，或者对象颜色是随层或随块，而图形所在图层或块的颜色是黑色的，那么无论你怎样改变着色模式，它都是黑色的。

改变图形对象的颜色主要有以下几种途径：
2 [) _5 u6 U; M  j1、如果图形对象是块的组成部分，而且其颜色是随块（byblock），那么改变其所在块参照的颜色就可以了
2、如果图形对象的颜色是随层（bylayer），那么可以改变其所在图层的颜色，也可以把图形对象放到另一个颜色的图层
3、修改图形对象的颜色属性
, W+ t3 b6 B& j& h, J( C4 t
5 Z6 |! J* A4 I. k# C, l7 N修改图形、组、图层颜色属性的方法，我在这个帖子版主。。请问如何在程序中添加 真实 模式呢？命令如何实现。。。中已经解答了。
& d8 m) a, L& B% E+ ]把图形对象放到另一个图层，要修改该图形对象的Layer属性为另一个图层的名字
创建一个新图层，要使用文档对象的Layers集合的Add方法

jjww123

1、如果图形对象是块的组成部分，而且其颜色是随块（byblock），那么改变其所在块参照的颜色就可以了
. j0 x* m8 x6 Q2 P  W
' y. P$ }* U+ n7 b) T, m
如何操作才能改成随块呢？。。然后选择块的颜色呢？

woaishuijia

如何操作才能改成随块呢？

修改图形对象的颜色属性，使用索引颜色，索引值设为acByBlock（命名常数，等于0）
6 a9 h+ _: l8 N

然后选择块的颜色呢？

是块参照（BlockRef对象），不是块（Block对象）
  J0 Y, m  m( I( n& a6 I' v. `2 v修改块参照的颜色属性