明经CAD社区

 找回密码
 注册

QQ登录

只需一步,快速开始

搜索
查看: 1082|回复: 1

如何更改CAD的背景颜色?

[复制链接]
发表于 2014-7-25 10:05:36 | 显示全部楼层 |阅读模式

问题描述 

在使用CAD进行图纸设计时,有的用户需要进行截图,但是系统默认的黑色背景与插入截图的场景颜色不相搭,可否通过设置和修改CAD的背景颜色达到目的呢?

解决方法 

首先我们打开cad程序,然后点击上方的【工具】按钮,再选择【选项】对话框。 

系统弹出选项对话框,我们在对话框中点击【显示】选项卡。 

新弹出的对话框,找到左上角位置的窗口元素,从中选择【颜色】按钮。 

这时就可以在【图形窗口颜色】对话框中根据用户需要自行选择所需的颜色了。 

完成设置后点击下方的【应用并关闭】保存修改即可。如图。


发表于 2014-7-25 11:28:46 | 显示全部楼层
  1. ;; This lisp can change background color for 2D model space

  2. (defun c:gr (/ VAR-COLOUR DISPLAY clno blue rde green)
  3.   (setq clno (getint "\n=>Input colour No!"))
  4.   (prompt "\n,1=red,2=yellow,3=gree,4=cyan,5=blue,6=magenta,7=white"
  5.   )
  6.   (cond        ((= clno 1)
  7.          (progn (setq rde 255) (setq green 0) (setq blue 0))
  8.         )
  9.         ((= clno 2)
  10.          (progn (setq rde 255) (setq green 255) (setq blue 0))
  11.         )
  12.         ((= clno 3)
  13.          (progn (setq rde 0) (setq green 255) (setq blue 0))
  14.         )
  15.         ((= clno 4)
  16.          (progn (setq rde 0) (setq green 255) (setq blue 255))
  17.         )
  18.         ((= clno 5)
  19.          (progn (setq rde 0) (setq green 0) (setq blue 255))
  20.         )
  21.         ((= clno 6)
  22.          (progn (setq rde 255) (setq green 0) (setq blue 255))
  23.         )
  24.         ((= clno 7)
  25.          (progn (setq rde 255) (setq green 255) (setq blue 255))
  26.         )
  27.         ((= clno 8)
  28.          (progn (setq rde 128) (setq green 128) (setq blue 128))
  29.         )
  30.         ((= clno 9)
  31.          (progn (setq rde 192) (setq green 192) (setq blue 192))
  32.         )
  33.         (t (progn (setq rde 0) (setq green 0) (setq blue 0)))
  34.   )
  35.   (setq
  36.     VAR-COLOUR (vlax-make-variant
  37.                  (+ rde (* green 256)(* blue 65536))
  38.                  vlax-vblong
  39.                )
  40.     DISPLAY    (vla-get-display
  41.                  (vla-get-preferences
  42.                    (vla-get-application (vlax-get-acad-object))
  43.                  )
  44.                )
  45.   )
  46.   (vla-put-graphicswinlayoutbackgrndcolor DISPLAY VAR-COLOUR)
  47.   (vla-put-graphicswinmodelbackgrndcolor DISPLAY VAR-COLOUR)
  48. )
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2024-11-25 04:52 , Processed in 0.200376 second(s), 27 queries , Gzip On.

Powered by Discuz! X3.4

Copyright © 2001-2021, Tencent Cloud.

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