'
' The following constants can be used to set Access ForeColor, BackColor,
' or BorderColor properties to match the Windows system colors chosen by
' the application user.  Constants copied from MS Access online Help.
'
Global Const CLR_DESKTOP&                  = -2147483647 ' Desktop.
Global Const CLR_APPLICATION_WORKSPACE&    = -2147483636 ' Background color of multiple document interface (MDI) applications.
Global Const CLR_WINDOW_BACKGROUND&        = -2147483643 ' Window background.
Global Const CLR_WINDOW_TEXT&              = -2147483640 ' Text in windows.
Global Const CLR_MENU_BAR&                 = -2147483644 ' Menu background.
Global Const CLR_MENU_TEXT&                = -2147483641 ' Text in menus.
Global Const CLR_ACTIVE_TITLE_BAR&         = -2147483646 ' Active window caption.
Global Const CLR_INACTIVE_TITLE_BAR&       = -2147483645 ' Inactive window caption.
Global Const CLR_ACTIVE_TITLE_BAR_TEXT&    = -2147483639 ' Text in caption, size box, scroll-bar arrow box..
Global Const CLR_INACTIVE_TITLE_BAR_TEXT&  = -2147483629
Global Const CLR_ACTIVE_BORDER&            = -2147483638 ' Active window border.
Global Const CLR_INACTIVE_BORDER&          = -2147483637 ' Inactive window border.
Global Const CLR_WINDOW_FRAME&             = -2147483642 ' Window frame.
Global Const CLR_SCROLL_BARS&              = -2147483648 ' Scroll-bars gray area.
Global Const CLR_BUTTON_FACE&              = -2147483633 ' Face shading on command buttons.
Global Const CLR_BUTTON_SHADOW&            = -2147483632 ' Edge shading on command buttons.
Global Const CLR_BUTTON_TEXT&              = -2147483630 ' Text on push buttons.
Global Const CLR_BUTTON_HIGHLIGHT&         = -2147483628
Global Const CLR_DISABLED_TEXT&            = -2147483631 ' Grayed (disabled) text.  This color is set to 0 if the current display driver does not support a solid gray color.
Global Const CLR_HIGHLIGHT&                = -2147483635 ' Items selected item in a control.
Global Const CLR_HIGHLIGHTED_TEXT&         = -2147483634 ' Text of item selected in a control.

'
' Here are the same constants from the MS Visual Basic CONSTANT.TXT file
' for those who are interested in compatibility with VB. 
'
Global Const SCROLL_BARS           = &H80000000 ' Scroll-bars gray area.
Global Const DESKTOP               = &H80000001 ' Desktop.
Global Const ACTIVE_TITLE_BAR      = &H80000002 ' Active window caption.
Global Const INACTIVE_TITLE_BAR    = &H80000003 ' Inactive window caption.
Global Const MENU_BAR              = &H80000004 ' Menu background.
Global Const WINDOW_BACKGROUND     = &H80000005 ' Window background.
Global Const WINDOW_FRAME          = &H80000006 ' Window frame.
Global Const MENU_TEXT             = &H80000007 ' Text in menus.
Global Const WINDOW_TEXT           = &H80000008 ' Text in windows.
Global Const TITLE_BAR_TEXT        = &H80000009 ' Text in caption, size box, scroll-bar arrow box..
Global Const ACTIVE_BORDER         = &H8000000A ' Active window border.
Global Const INACTIVE_BORDER       = &H8000000B ' Inactive window border.
Global Const APPLICATION_WORKSPACE = &H8000000C ' Background color of multiple document interface (MDI) applications.
Global Const HIGHLIGHT             = &H8000000D ' Items selected item in a control.
Global Const HIGHLIGHT_TEXT        = &H8000000E ' Text of item selected in a control.
Global Const BUTTON_FACE           = &H8000000F ' Face shading on command buttons.
Global Const BUTTON_SHADOW         = &H80000010 ' Edge shading on command buttons.
Global Const GRAY_TEXT             = &H80000011 ' Grayed (disabled) text.  This color is set to 0 if the current display driver does not support a solid gray color.
Global Const BUTTON_TEXT           = &H80000012 ' Text on push buttons.