可否让命令行等提示内容带上颜色啊？

fan_zh

如题，是否可以实现？
options里可以设置，但控制它的变量是什么？

lucas_3333

是像这样改色吗? 如果是,请参照这里:
http://bbs.mjtd.com/forum.php?mod=viewthread&tid=168624

自贡黄明儒

(vla-put-TextWinTextColor DISPLAY varBlack)

lucas_3333

命令行背景与文字颜色互相切换
颜色列表参照上面说的那个贴子

1. (defun c:color_qiehuan( / col dis )
   
2.     (setq col (if textwintoggle:flag 65280 0)
   
3.           dis (vla-get-display (vla-get-preferences (vlax-get-acad-object)))
   
4.           textwintoggle:flag (not textwintoggle:flag)
   
5.     )         
   
6.     (vla-put-textwinbackgrndcolor dis col)
   
7.     (vla-put-textwintextcolor dis (- 65280 col))
   
8.     (princ)
   
9. )

(defun c:color_qiehuan( / col dis )<br />     (setq col (if textwintoggle:flag 65280 0)<br />           dis (vla-get-display (vla-get-preferences (vlax-get-acad-object)))<br />           textwintoggle:flag (not textwintoggle:flag)<br />     )          <br />     (vla-put-textwinbackgrndcolor dis col)<br />     (vla-put-textwintextcolor dis (- 65280 col))<br />     (princ)<br /> )

fan_zh

受教了，回去研究研究