GraphicsWinBackgrndColor property example

 

Sub GraphicsWinLayoutBackgrndColor_Example()

    ' This example returns the current setting of GraphicsWinLayoutBackgrndColor.

    Dim myPrefs As AcadPreferences

    Set myPrefs = ThisDrawing.Application.preferences

    Dim currLayoutBGColor As OLE_COLOR

    Set myPrefs = ThisDrawing.Application.preferences

    ' Retrieve the current GraphicsWinLayoutBackgrndColor value

    currLayoutBGColor = myPrefs.Display.GraphicsWinLayoutBackgrndColor

    MsgBox "The current value for GraphicsWinLayoutBackgrndColor is " & currLayoutBGColor

End Sub

 


Bricscad™ is commercialized by Bricsys NV. Bricsys NV and Vondle NV are fully owned subsidiaries of Menhirs NV. © 2001- Menhirs NV - All rights reserved.