设为首页收藏本站CAD论坛CAD教程CAD下载明经币充值
切换到宽版

明经CAD社区

 找回密码
 注册

QQ登录

只需一步，快速开始

搜索
明经CAD社区»社区 › 开发篇 › AutoLISP/Visual LISP 编程技术 › 寻求控制窗口配色方案的命令
返回列表 发新帖
查看: 880|回复: 3

[提问] 寻求控制窗口配色方案的命令

[复制链接]
nyistjz
发表于 2017-12-11 17:23:34 | 显示全部楼层 |阅读模式
在cad2018中，是如下注册表中的参数来控制明暗配色的[HKEY_CURRENT_USER\Software\Autodesk\AutoCAD\R22.0\ACAD-1001:804\Profiles\<<未命名配置>>\Dialogs\OptionsDialog_DisplayTab]
"COLORSCHEME"=dword:1



请问：我在命令行中，输入什么命令可以控制这个配色方案的调整？
就像(setenv "Scrollbars" "0")可以控制滚动条隐藏一样！

本帖子中包含更多资源

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

x
"觉得好，就打赏"
打赏
还没有人打赏，支持一下
回复

使用道具 举报

1993063
发表于 2017-12-11 21:36:11 | 显示全部楼层
,具体功能自己测试
  1. (
  2.   (lambda ( / x )
  3.     (foreach x
  4.       '(
  5.         ("ANSIHatch" "acad.pat")
  6.         ("ANSILinetype" "acad.lin")
  7.         ("Anyport" "0")
  8.         ("AutoSnapColor" "2")
  9.         ("AutoSnapControl" "39")
  10.         ("AutoSnapPolarDistance" "0")
  11.         ("AutoSnapPolarMode" "7")
  12.         ("AutoSnapSize" "12")
  13.         ("Autotracking vector" "0")
  14.         ("Background" "0")
  15.         ("BEdit ATrack use tint" "0")
  16.         ("BEdit ATrack vector" "16777215")
  17.         ("BEdit AutoSnap Color" "4622280")
  18.         ("BEdit bk color" "14469063")
  19.         ("BEdit bk use tint" "0")
  20.         ("BEdit color" "5706774")
  21.         ("BEdit end color" "10053222")
  22.         ("BEdit falloff color" "10053222")
  23.         ("BEdit glyphs color" "13408614")
  24.         ("BEdit hotspot color" "13408614")
  25.         ("BEdit lux at distance color" "6730444")
  26.         ("BEdit start color" "10053222")
  27.         ("BEdit Web color" "58879")
  28.         ("BEdit Web shape color" "58879")
  29.         ("BEdit Web(missing file) color" "255")
  30.         ("BEdit Xhair color" "16777215")
  31.         ("BEdit Xhair use tint" "0")
  32.         ("BEditBackground" "0")
  33.         ("BNS_FSMODE" "OFF")
  34.         ("MaxHatch" "10000000")
  35.         ("CLIInit" "1")
  36.         ("CmdLine.BackColor" "0")
  37.         ("CmdLine.FontFace" "新宋体")
  38.         ("CmdLine.FontHeight" "8")
  39.         ("CmdLine.FontItalic" "0")
  40.         ("CmdLine.FontPitchAndFamily" "49")
  41.         ("CmdLine.FontWeight" "400")
  42.         ("CmdLine.ForeColor" "1677721")
  43.         ("CmdVisLines" "4")
  44.         ("ContextMenus" "2")
  45.         ("CreateViewPorts" "0")
  46.         ("CustomColors" "1")
  47.         ("EmergencyFont" "simplex.shx")
  48.         ("EnterpriseMenuFile" ".")
  49.         ("FileDialog" "1")
  50.         ("FontHeight" "8")
  51.         ("FontItalic" "0")
  52.         ("FontPitchAndFamily" "0")
  53.         ("FontWeight" "400")
  54.         ("FP_NO_HOST_CHECK" "NO")
  55.         ("HatchGapTolerance" "1")
  56.         ("HideSystemPrinters" "0")
  57.         ("InsertUnitsDefSource" "4")
  58.         ("InsertUnitsDefTarget" "4")
  59.         ("IsaveBackupDwg" "1")
  60.         ("ISOHatch" "acadiso.pat")
  61.         ("ISOLinetype" "acadiso.lin")
  62.         ("Layout ATrack use tint" "1")
  63.         ("Layout ATrack vector" "0")
  64.         ("Layout AutoSnap Color" "4622280")
  65.         ("Layout background" "0")
  66.         ("Layout bk color" "14469063")
  67.         ("Layout bk use tint" "0")
  68.         ("Layout clipping color" "15780518")
  69.         ("Layout color" "5706774")
  70.         ("Layout end color" "10053222")
  71.         ("Layout falloff color" "10053222")
  72.         ("Layout frustrum color" "6711039")
  73.         ("Layout glyphs color" "13408614")
  74.         ("Layout hotspot color" "13408614")
  75.         ("Layout lux at distance color" "6730444")
  76.         ("Layout start color" "10053222")
  77.         ("Layout Web color" "58879")
  78.         ("Layout Web shape color" "58879")
  79.         ("Layout Web(missing file) color" "255")
  80.         ("Layout Xhair use tint" "1")
  81.         ("LayoutRegenControl" "1")
  82.         ("LayoutXhairPickboxEtc" "65535")
  83.         ("LineWeightUnits" "1")
  84.         ("MainDictionary" "enu")
  85.         ("MaxDwg" "0")
  86.         ("ModeBits" "-2")
  87.         ("Model ATrack use tint" "1")
  88.         ("Model ATrack vector" "65280")
  89.         ("Model AutoSnap Color" "39423")
  90.         ("Model bk color" "14469063")
  91.         ("Model bk use tint" "0")
  92.         ("Model clipping color" "13408614")
  93.         ("Model color" "5706774")
  94.         ("Model end color" "13408614")
  95.         ("Model falloff color" "1")
  96.         ("Model frustrum color" "6711039")
  97.         ("Model glyphs color" "10512672")
  98.         ("Model hotspot color" "58879")
  99.         ("Model lux at distance color" "6730444")
  100.         ("Model start color" "13408614")
  101.         ("Model Web color" "10512672")
  102.         ("Model Web shape color" "58879")
  103.         ("Model Web(missing file) color" "255")
  104.         ("Model Xhair use tint" "1")
  105.         ("MonoVectors" "0")
  106.         ("NUMBER_OF_PROCESSORS" "4")
  107.         ("ObjectSnapCursorSize" "7")
  108.         ("Parallel ATrack use tint" "0")
  109.         ("Parallel ATrack vector" "4210752")
  110.         ("Parallel AutoSnap Color" "4622280")
  111.         ("Parallel background" "0")
  112.         ("Parallel bk color" "14469063")
  113.         ("Parallel bk use tint" "1")
  114.         ("Parallel clipping color" "15780518")
  115.         ("Parallel color" "5706774")
  116.         ("Parallel end color" "13408614")
  117.         ("Parallel falloff color" "13408614")
  118.         ("Parallel frustrum color" "6711039")
  119.         ("Parallel glyphs color" "16777215")
  120.         ("Parallel grid axis lines color" "16777215")
  121.         ("Parallel grid axis lines tint" "1")
  122.         ("Parallel grid major lines color" "14474460")
  123.         ("Parallel grid major lines tint" "0")
  124.         ("Parallel grid minor lines color" "13290186")
  125.         ("Parallel grid minor lines tint" "0")
  126.         ("Parallel hotspot color" "16777215")
  127.         ("Parallel lux at distance color" "6730444")
  128.         ("Parallel start color" "13408614")
  129.         ("Parallel Web color" "58879")
  130.         ("Parallel Web shape color" "58879")
  131.         ("Parallel Web(missing file) color" "255")
  132.         ("Parallel Xhair color" "39168")
  133.         ("Parallel Xhair use tint" "1")
  134.         ("Perspective ATrack use tint" "0")
  135.         ("Perspective ATrack vector" "4210752")
  136.         ("Perspective AutoSnap Color" "4622280")
  137.         ("Perspective bk color" "14469063")
  138.         ("Perspective bk use tint" "1")
  139.         ("Perspective clipping color" "15780518")
  140.         ("Perspective color" "5706774")
  141.         ("Perspective end color" "10053222")
  142.         ("Perspective falloff color" "10053222")
  143.         ("Perspective frustrum color" "6711039")
  144.         ("Perspective glyphs color" "13408614")
  145.         ("Perspective grid axis lines color" "16777215")
  146.         ("Perspective grid axis lines tint" "1")
  147.         ("Perspective grid major lines color" "15132390")
  148.         ("Perspective grid major lines tint" "0")
  149.         ("Perspective grid minor lines color" "14145495")
  150.         ("Perspective grid minor lines tint" "0")
  151.         ("Perspective ground horizon" "14474460")
  152.         ("Perspective ground origin" "12831432")
  153.         ("Perspective hotspot color" "13408614")
  154.         ("Perspective lux at distance color" "6730444")
  155.         ("Perspective sky horizon" "15393506")
  156.         ("Perspective sky zenith" "0")
  157.         ("Perspective start color" "10053222")
  158.         ("Perspective sub-surface azimuth" "11978715")
  159.         ("Perspective sub-surface horizon" "13816538")
  160.         ("Perspective Web color" "58879")
  161.         ("Perspective Web shape color" "58879")
  162.         ("Perspective Web(missing file) color" "255")
  163.         ("Perspective Xhair color" "39168")
  164.         ("Perspective Xhair use tint" "1")
  165.         ("Plot preview background" "16777215")
  166.         ("PLOTLEGACY" "0")
  167.         ("PLSPOOLALERT" "1")
  168.         ("PROCESSOR_LEVEL" "6")
  169.         ("SAVEHOOK_SAVEFORMAT_OVERRIDE" "-1")
  170.         ("Scrollbars" "0")
  171.         ("SDIMode" "0")
  172.         ("ShowFullPathInTitle" "1")
  173.         ("ShowPaperBackground" "0")
  174.         ("ShowPaperMargins" "0")
  175.         ("ShowPrintBorder" "0")
  176.         ("ShowProxyDialog" "0")
  177.         ("ShowProxyGraphics" "0")
  178.         ("ShowTabs" "1")
  179.         ("TextWindow.FontFace" "新宋体")
  180.         ("TextWindow.FontHeight" "8")
  181.         ("TextWindow.FontItalic" "0")
  182.         ("TextWindow.FontPitchAndFamily" "49")
  183.         ("TextWindow.FontWeight" "400")
  184.         ("TextWindow.ForeColor" "1677721")
  185.         ("ToolTipInitialDelay" "500")
  186.         ("TraySettingsShowIcons" "0")
  187.         ("UseMRUConfig" "0")
  188.         ("UseStartUpDialog" "0")
  189.         ("Validation Policy" "3")
  190.         ("Validation Strategy" "1")
  191.         ("WhipThreadEnable" "15")
  192.         ("windows_tracing_flags" "3")
  193.         ("XhairPickboxEtc" "32767")
  194.       )
  195.       (vl-catch-all-apply 'setenv x)
  196.     )
  197.   )
  198. )
复制代码
回复 支持 反对

使用道具 举报

nyistjz
 楼主| 发表于 2017-12-11 22:24:04 | 显示全部楼层
查无此项，没有所需要的选项！
回复 支持 反对

使用道具 举报

andyhua
发表于 2017-12-13 09:40:56 | 显示全部楼层
楼上的这些代码都是些什么功能啊？能否给个详细的中文注解啊？一个个试，都不知道对应的是CAD哪些位置？唉，好人啊，送佛上西哦……
回复 支持 反对

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2025-5-19 21:11 , Processed in 0.168160 second(s), 26 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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