Default button backcolour

Hi,

I have a control array of buttons which are have the default button colour as a backcolor.

When the user scrolls over the buttons I'm changing the backcolours to something else, and what to change it back to the default colour afterwards.

Is there a vb constant for the default button colour?

VB Code:

Private Declare Function GetSysColor Lib "user32" (ByVal nIndex As Long) As Long
 
Private Const COLOR_BTNFACE = 15
 
Private Sub Command1_Click()
    Command1.BackColor = GetSysColor(COLOR_BTNFACE)
End Sub

I just found this. Will it work the same or is it the wrong constant. It seems to work though.

VB Code:

cmdButton(Index).BackColor = vbButtonFace

Hmmm...never knew that. It should work just the same.

:)

Yes, it will work. I do things like that all the time. (There are built in values for all(?) the system and pallet colors like vbButtonFace, vbButtonShadow, vbInactiveCaptionText, etc.)