﻿#include <GUIConstantsEx.au3>

#include 'WinAPI_ThemeSetProgress.au3'

Global $hGui = GUICreate('_WinAPI_ThemeSetProgress-Example', 520, 240, -1, -1)

Global $idProgress1 = GUICtrlCreatePic('', 10, 10, 500, 30)
_WinAPI_ThemeSetProgress(-1, 28, $PBST_PERCENT, 20, 'Arial') ; Ctrl-ID, Percent, State, Fontsize, Fontname

Global $idProgress2 = GUICtrlCreatePic('', 10, 60, 500, 20)
_WinAPI_ThemeSetProgress(-1, 67, $PBST_PERCENT, 14, 'Verdana') ; Ctrl-ID, Percent, State, Fontsize, Fontname

Global $idProgress3 = GUICtrlCreatePic('', 10, 100, 500, 30)
_WinAPI_ThemeSetProgress(-1, 42, $PBST_ERROR) ; Ctrl-ID, Percent, State

Global $idProgress4 = GUICtrlCreatePic('', 10, 150, 500, 20)
_WinAPI_ThemeSetProgress(-1, 88, $PBST_PAUSED + $PBST_PERCENT, 12, 'Verdana') ; Ctrl-ID, Percent, State, Fontsize, Fontname

Global $idProgress5 = GUICtrlCreatePic('', 10, 190, 500, 30)
_WinAPI_ThemeSetProgress(-1, 70, $PBST_MIXED) ; Ctrl-ID, Percent, State

GUISetState(@SW_SHOW)

Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE
