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. |