如何给选中的单行文字调成红色呢？用vlisp

cfc

好像给文字改色的，有个accmcolor对象，不会用。

xj6019

(Vlax-Put-Property (Vlax-Ename->Vla-Object (car (entsel))) 'Color  色号 )

vitalgg

用dxf 62 码多简单

1. (entity:putdxf ent 62 1)

(entity:putdxf ent 62 1)

ax方法

1. (setq ax-color (color:interface)) ;; 实例化颜色接口
   
2. (vla-setRGB ax-color 255 0 0) ;; 将颜色接口设为红色
   
3. (vla-put-truecolor (vla:sel) ax-color) ;; 将选择的对象的真彩色属性 设为 红色接口的实例。
   

(setq ax-color (color:interface)) ;; 实例化颜色接口<br /> (vla-setRGB ax-color 255 0 0) ;; 将颜色接口设为红色<br /> (vla-put-truecolor (vla:sel) ax-color) ;; 将选择的对象的真彩色属性 设为 红色接口的实例。<br />