ajunseo 发表于 2021-5-27 17:48:50

CAD背景颜色设置为纯黑色的系统变是什么？

CAD背景颜色设置为纯黑色的系统变是什么？

ㄘ丶转裑ㄧ灬 发表于 2021-5-28 09:25:16

    (setq prefDisplay (vla-get-Display (vla-get-Preferences (vlax-get-acad-object))))
    (vla-put-GraphicsWinModelBackgrndColor prefDisplay (vlax-make-variant 0 vlax-vbLong));设定模型背景色:黑色
    (vla-put-GraphicsWinLayoutBackgrndColor prefDisplay (vlax-make-variant 0 vlax-vbLong));设定布局背景色:黑色
(vl-catch-all-apply
       '(lambda ( / x )
               (setq x (vlax-get-property (vlax-get-property (vlax-get-acad-object) 'Preferences) 'Display))
               (vlax-put-property x 'DisplayScrollBars :vlax-false)                        ;关闭滚动条
               (vlax-put-property x 'LayoutDisplayMargins :vlax-false)                ;在布局不显示可打印区域
               (vlax-put-property x 'LayoutDisplayPaper :vlax-false)                        ;在布局不显示图纸背景
               (vlax-put-property x 'LayoutDisplayPaperShadow :vlax-false)                ;在布局不显示图纸阴影
      )
)

nyistjz 发表于 2021-6-4 13:54:49

ㄘ丶转裑ㄧ灬 发表于 2021-5-28 09:25


你这个关闭滚动条，不显示 打印区域的这些参数，都是在哪里找出来的？
您看一下，我这个贴子中的问题，您有没有办法能解决？
http://bbs.mjtd.com/thread-183507-1-1.html

mokson 发表于 2021-6-5 20:19:47

学习了，谢谢。

ajunseo 发表于 2021-6-7 12:05:03


学习了，谢谢。
页: [1]
查看完整版本: CAD背景颜色设置为纯黑色的系统变是什么？