GUICtrlGetBkColor() - Get the background color of a control.

[guinness]

You're welcome.

[KaFu]

10 hours ago, memerim said:

@KaFu how do it works fine to you, if the hex $icolor valor returned in the msgbox is always 0xF0F0F0 independent of the value set in "xxxx" ?

GUICtrlSetBkColor($text, xxxx)

You are right, didn't realize that mixed up f2f2f2 and f0f0f0 ;). _WinAPI_GetPixel 0,0 seems to catch the border of the button, so getbckcolor needs to be adjusted by 3,3 to capture the buttons background. It get's even worse with an Input control, where the default will capture the input caret. So depending on the control type this one still needs more tweaking.

#include <WinAPIGdi.au3>

$h_GUI = GUICreate("# WINDOW #", 200, 200)
$c_button = GUICtrlCreateButton("TEST", 40, 34, 90, 90)
GUICtrlSetBkColor($c_button, 0x000000)

$c_input = GUICtrlCreateInput("test", 10, 130, 180, 20)

GUISetState(@SW_SHOW)

For $i = 0x000000 To 0xffffff
    GUICtrlSetBkColor($c_button, $i)
    GUICtrlSetData($c_input, Hex(GUICtrlGetBkColor($c_button), 6))
Next

; #FUNCTION# ====================================================================================================================
; Name ..........: GUICtrlGetBkColor
; Description ...: Retrieves the RGB value of the control background.
; Syntax ........: GUICtrlGetBkColor($hWnd)
; Parameters ....: $hWnd                - Control ID/Handle to the control
; Return values .: Success - RGB value
;                  Failure - 0
; Author ........: guinness
; Example .......: Yes
; ===============================================================================================================================

Func GUICtrlGetBkColor($hWnd)
    If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)
    Local $hDC = _WinAPI_GetDC($hWnd)
    Local $iColor = _WinAPI_GetPixel($hDC, 3, 3)
    _WinAPI_ReleaseDC($hWnd, $hDC)
    Return $iColor
EndFunc   ;==>GUICtrlGetBkColor

 

[Bilgus]

I believe the better way to do all of this would be to get the hdc for the control and send the proper message to have the winproc send you the hBrush for the background

Something like this (for static controls at least)

Func GUICtrlGetBkColor($hWnd)
    If Not IsHWnd($hWnd) Then $hWnd = GUICtrlGetHandle($hWnd)
    Local $hWnd_Main = _WinAPI_GetParent ($hWnd)
    Local $hDC = _WinAPI_GetDC($hWnd)
    Local $hBrush = _SendMessage($hWndMain, $WM_CTLCOLORSTATIC, $hdc, $hWnd)
    Local $iColor = _GetBrushColor($hBrush)
    _WinAPI_ReleaseDC($hWnd, $hDC)
    Return $iColor
EndFunc

 

Edited April 30, 2020 by Bilgus