AfraLisp Blog

The AutoLisp/Visual Lisp/VBA Resource Website

AfraLisp Blog

Home Newsletter Utter Rubbish Coding Tips AutoCAD Tips Contact Downloads WAUN

Any ideas on how I could toggle the screen color in paperspace (Acad2000) from white-black and black-white?

Kevin
-----------------------
This will get you started :

;CODING STARTS HERE
(vl-load-com)
(setq acaddisplay (vla-get-display (vla-get-preferences (vlax-get-Acad-Object))))
(vla-put-GraphicsWinLayoutBackgrndColor acaddisplay 0)
;CODING ENDS HERE

This will change the Paper Space background color to black.
And, to change it back to white :

(vla-put-GraphicsWinLayoutBackgrndColor acaddisplay 16777215)

Check out the VBA Help on "GraphicsWinLayoutBackgrndColor".
For Model Space, check out "GraphicsWinModelBackgrndColor".

The AutoLisp/Visual Lisp/VBA Resource Website

Copyright © 1999-Perpetuity by AfraLisp

All rights reserved.
Information in this document is subject to change without notice.
Site created and maintained by Kenny Ramage

The AutoLisp/Visual Lisp/VBA Resource Website