#include <GUIConstantsEx.au3>

Example()

Func Example()
	Local $msg, $ProgressBar

	GUICreate("Цвет фона элементов GUI") ; Создаёт окно в центре экрана

	GUICtrlCreateLabel("Зелёный фон", 10, 20)
	GUICtrlSetBkColor(-1, 0xCCFFCC) ; Светло-зелёный

	$ProgressBar = GUICtrlCreateProgress(10, 60, 200, 20)
	; Применяет к $ProgressBar классический стиль, чтобы окрасить элемент
	DllCall("UxTheme.dll", "int", "SetWindowTheme", "hwnd", GUICtrlGetHandle($ProgressBar), "wstr", 0, "wstr", 0)
	GUICtrlSetColor(-1, 0x0080FF) ; Лазурный
	GUICtrlSetBkColor(-1, 0xFDFFAE) 
	GUICtrlSetData(-1, 50)

	GUISetState()

	; Запускается цикл опроса GUI до тех пор пока окно не будет закрыто
	While 1
		$msg = GUIGetMsg()

		If $msg = $GUI_EVENT_CLOSE Then ExitLoop
	WEnd
EndFunc