用lisp把cad光标颜色改为9号色可行？

iamhuangjinming · 发表于 2016-10-20 07:46:20

工作常需要光标颜色改为9号，总是去调很麻烦～

669423907 · 发表于 2016-10-20 08:28:18

;光标颜色:58
(vl-load-com);(getenv "XhairPickboxEtc");查看光标颜色
(setq acadPrefDisplay (vla-get-display
(vla-get-preferences (vlax-get-acad-object)) ) )
(vla-put-modelcrosshaircolor acadPrefDisplay 4161407);58=19532;57=4161407
我也不知道这颜色号是怎么换算的，9=12632256

Andyhon · 发表于 2016-10-20 11:05:11

You might check here
http://www.lee-mac.com/colourconversion.html

iamhuangjinming · 发表于 2016-10-20 16:35:44

669423907 发表于 2016-10-20 08:28
;光标颜色:58
(vl-load-com);(getenv "XhairPickboxEtc");查看光标颜色
(setq acadPrefDisplay (vla-get- ...

好诡异的编码

iamhuangjinming · 发表于 2016-10-20 20:06:32

669423907 发表于 2016-10-20 08:28
;光标颜色:58
(vl-load-com);(getenv "XhairPickboxEtc");查看光标颜色
(setq acadPrefDisplay (vla-get- ...

百度了一下，是十进制的编码。。谢谢啦

214063858 · 发表于 2016-10-21 11:15:17

学习了

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

[提问] 用lisp把cad光标颜色改为9号色可行？

评分