明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 1634|回复: 9

[提问] 请问改十字光标颜色lisp要怎么表达

[复制链接]
发表于 2015-7-1 13:55 | 显示全部楼层 |阅读模式
本帖最后由 _Levin 于 2022-5-26 13:42 编辑

一个是要在模型空间里改十字光标的颜色,一个是要在布局空间改十字光标的颜色,最后一条是在块编辑器里改十字光标的颜色  颜色都为150,应该怎么表达?

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?注册

x
"觉得好,就打赏"
还没有人打赏,支持一下
发表于 2015-7-1 14:28 | 显示全部楼层
16版有个变量监控器,你修改后看看变量监控的有没有变化。
 楼主| 发表于 2015-7-1 15:19 | 显示全部楼层
自贡黄明儒 发表于 2015-7-1 14:28
16版有个变量监控器,你修改后看看变量监控的有没有变化。

我查过cad系统变量,并没有直接控制这个颜色的
发表于 2015-7-1 16:12 | 显示全部楼层
本帖最后由 lucas_3333 于 2015-7-1 16:57 编辑

vla-Put-ModelCrosshairColor

示例1
  ; Color list:
   ;        0 = Black
   ;      255 = Red
   ;    65535 = Yellow
   ;    65280 = Green
   ; 16776960 = Cyan
   ; 16711680 = Blue
   ; 16711935 = Magenta
   ; 16777215 = White
  1. (vl-load-com)
  2. (setq acadPrefDisplay
  3.        (vla-get-display
  4.          (vla-get-preferences (vlax-get-acad-object))
  5.        )
  6. )
  7. ;;Call
  8. (vla-put-modelcrosshaircolor acadPrefDisplay  12582656)
发表于 2015-7-1 16:22 | 显示全部楼层
示例2
;;(ChangeModelCrosshairColor 1)
  1. (defun ChangeModelCrosshairColor(col)
  2.   (vla-put-ModelCrosshairColor
  3.     (vla-get-display (vla-get-preferences (vlax-get-acad-object)))
  4.     (ACI2OLE col)
  5.   )
  6. )
  7. (defun ACI2OLE (aci)
  8.   (if (and (>= aci 0) (<= 255))
  9.     (setq aci (nth aci OCL)
  10.     )
  11.   )
  12. )
  13. (setq OCL
  14.        '(0          255        65535      65280      16776960
  15.          16711680   16711935   16777215   8421504    12632256
  16.          255        8421631    166        5460902    128
  17.          4210816    76         2500172    38         1250086
  18.          16639      8429567    10662      5466278    8320
  19.          4214912    4940       2502732    2598       1251366
  20.          33023      8437759    21414      5471398    16512
  21.          4219008    9804       2505036    4902       1252646
  22.          49151      8445951    31910      5476774    24704
  23.          4223104    14668      2507596    7462       1253670
  24.          65535      8454143    42662      5482150    32896
  25.          4227200    19532      2509900    9766       1254950
  26.          65471      8454111    42620      5482129    32864
  27.          4227184    19513      2509891    9757       1254945
  28.          65408      8454079    42579      5482108    32832
  29.          4227168    19494      2509881    9747       1254941
  30.          65344      8454047    42537      5482088    32800
  31.          4227152    19475      2509872    9738       1254936
  32.          65280      8454016    42496      5482067    32768
  33.          4227136    19456      2509862    9728       1254931
  34.          4259584    10485632   2729472    6858323    2129920
  35.          5275712    1264640    3165222    665088     1582611
  36.          8453888    12582784   5481984    8169043    4227072
  37.          6324288    2509824    3755046    1254912    1910291
  38.          12582656   14679936   8168960    9545299    6324224
  39.          7372864    3755008    4410406    1910272    2172435
  40.          16776960   16777088   10921472   10921555   8421376
  41.          8421440    5000192    5000230    2500096    2500115
  42.          16760576   16768896   10910720   10916179   8413184
  43.          8417344    4995328    4997926    2497792    2498835
  44.          16744448   16760704   10900224   10910803   8404992
  45.          8413248    4990464    4995366    2495232    2497811
  46.          16728064   16752512   10889472   10905683   8396800
  47.          8409152    4985600    4993062    2492928    2496531
  48.          16711680   16744576   10878976   10900307   8388608
  49.          8405056    4980736    4990502    2490368    2495251
  50.          16711744   16744607   10879017   10900328   8388640
  51.          8405072    4980755    4990512    2490378    2495256
  52.          16711808   16744639   10879059   10900348   8388672
  53.          8405088    4980774    4990521    2490387    2495261
  54.          16711871   16744671   10879100   10900369   8388704
  55.          8405104    4980793    4990531    2490397    2495265
  56.          16711935   16744703   10879142   10900390   8388736
  57.          8405120    4980812    4990540    2490406    2495270
  58.          12517631   14647551   8126630    9524134    6291584
  59.          7356544    3735628    4400716    1900582    2167590
  60.          8388863    12550399   5439654    8147878    4194432
  61.          6307968    2490444    3745356    1245222    1905446
  62.          4194559    10453247   2687142    6837158    2097280
  63.          5259392    1245260    3155532    655398     1577766
  64.          5526612    5987163    10000536   12303291   14540253
  65.          16777215
  66.         )
  67. )

评分

参与人数 1明经币 +1 收起 理由
bzhjl + 1 很给力!

查看全部评分

 楼主| 发表于 2015-7-1 18:03 | 显示全部楼层
lucas_3333 发表于 2015-7-1 16:22
示例2
;;(ChangeModelCrosshairColor 1)

非常感谢,刚才我搞清楚了这些颜色怎么用的了  
 楼主| 发表于 2015-7-1 18:51 | 显示全部楼层
lucas_3333 发表于 2015-7-1 16:22
示例2
;;(ChangeModelCrosshairColor 1)

现在还有最后一个问题请教下,在块编辑器里改十字光标的颜色  我用了BlockCrosshairColor,还有BlockEditorCrosshairColor,都是出错哦,是我搞错单词了吗?

点评

都说的很清楚了,是在模型空间, 不是块编辑器下.....  发表于 2015-7-1 19:11
发表于 2015-7-1 19:01 | 显示全部楼层
(getenv "XhairPickboxEtc");-十字光标颜色
(getenv "LayoutXhairPickboxEtc");-图纸空间十字光标颜色
发表于 2015-7-1 19:16 | 显示全部楼层
liu22737 发表于 2015-7-1 19:01
(getenv "XhairPickboxEtc");-十字光标颜色
(getenv "LayoutXhairPickboxEtc");-图纸空间十字光标颜色

你试过吗? 我相信这种setenv的方式, 不能即时显示出来
在这里探讨过,http://bbs.mjtd.com/thread-109850-1-1.html
 楼主| 发表于 2015-7-4 00:24 | 显示全部楼层
_Levin 发表于 2015-7-1 18:51
现在还有最后一个问题请教下,在块编辑器里改十字光标的颜色  我用了BlockCrosshairColor,还有BlockEdit ...

模型里跟布局里已经搞明白了,大师,那么在块编辑器里面十字光标怎么表达的?
您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|CAD论坛|CAD教程|CAD下载|联系我们|关于明经|明经通道 ( 粤ICP备05003914号 )  
©2000-2023 明经通道 版权所有 本站代码,在未取得本站及作者授权的情况下,不得用于商业用途

GMT+8, 2024-4-25 22:01 , Processed in 0.369784 second(s), 31 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

快速回复 返回顶部 返回列表