shun 发表于 2004-12-12 16:10:00

如何得到CAD屏幕背景色?

请帮忙

孤星 发表于 2004-12-12 16:29:00

工具－选项－显示－颜色

shun 发表于 2004-12-13 08:19:00

在ARX中如何获得CAD屏幕背景色的颜色索引值

smilestone 发表于 2004-12-13 20:56:00

7.

baitang36 发表于 2023-2-9 08:16:50

(vl-load-com)
(defun c:chgsc(/ col DISPLAY)
      (setq    DISPLAY    (vla-get-display
                        (vla-get-preferences
                              (vla-get-application (vlax-get-acad-object))
                        )
                )
)
      (if (= (getenv "Background") "0") (setq col 255) (setq col 0))
      (vla-put-graphicswinlayoutbackgrndcolor DISPLAY (vlax-make-variant
                        (+ col (* col 256)(* col 65536))
                        vlax-vblong
      ))
(vla-put-graphicswinmodelbackgrndcolor DISPLAY (vlax-make-variant
                        (+ col (* col 256)(* col 65536))
                        vlax-vblong
      ))
      (princ)
)
页: [1]
查看完整版本: 如何得到CAD屏幕背景色?