[菜鸟求助]如何改变已存在的AcadMtext对象中文字的颜色？用什么命令好啊？

redfox · 发表于 2004-1-1 21:02:00

现在我想解决两个问题，一是只想把一幅图中文字为红色的Mtext对象中的文字写到一个字符串中，请问这个If语句是这样写吗？
mTextObj.TrueColor.ColorIndex =acRed 'mTextObj为Mtext对象
另一个问题是如何改变这个对象的颜色？这应该道理是一样的吧。紧急求助! 先谢了！

莫名 · 发表于 2004-1-1 21:05:00

mTextObj.Color=acRed
用同样的方法改变颜色。

redfox · 发表于 2004-1-1 21:13:00

但是我试了，mTextObj.TrueColor.ColorIndex =acBlue 不行啊，里面原来的字变不了颜色，而且还有个问题就是人工操作时需要先双击调出编辑框，选中要改变颜色的文字，然后这段文字就变色了，用程序执行的话是不是只是让往后再往里输的字才会变颜色啊。版主也帮我试试好吗？

莫名 · 发表于 2004-1-1 21:18:00

不是mTextObj.TrueColor.ColorIndex =acBlue 是mTextObj.Color=acBlue

redfox · 发表于 2004-1-1 21:46:00

呵呵，原来是我看错了，但还是有点问题，就是选中这个文本框之后，cad的快捷图标栏里的颜色是变成蓝色了，但里面的字还是红色的。刚才我也没注意我代码怎么运行的，刚开始有一次里面的字都变成蓝色了，现在又不行了。还是那个问题啊，它现在的颜色状态是改成蓝色了，但原来的字如果是红色的呢，也就是说我如何判断里面的字的颜色啊？