Sets the flags that determine how visual styles are implemented in the calling application
#include <WinAPITheme.au3>
_WinAPI_SetThemeAppProperties ( $iFlags )
| $iFlags | This parameter can be one or more of the following values. $STAP_ALLOW_NONCLIENT $STAP_ALLOW_CONTROLS $STAP_ALLOW_WEBCONTENT |
After you set the flags, you must send a WM_THEMECHANGED message for the changes to take effect.
Suche nach SetThemeAppProperties in der MSDN Bibliothek.
#include <APIThemeConstants.au3>
#include <GUIConstantsEx.au3>
#include <WinAPITheme.au3>
Local $iTheme = _WinAPI_GetThemeAppProperties()
Local $hForm = GUICreate("WinAPI Sezt und ermittelt die Theme AppProperties (v" & @AutoItVersion & ")", 310, 360)
GUISetFont(8.5, 400, 0, 'MS Shell Dlg', $hForm)
GUICtrlCreateGroup('Gruppe', 10, 10, 140, 95)
GUICtrlCreateCheckbox('Checkbox 1', 22, 26, 120, 23)
GUICtrlCreateCheckbox('Checkbox 2', 22, 49, 120, 23)
GUICtrlCreateCheckbox('Checkbox 3', 22, 72, 120, 23)
GUICtrlCreateGroup('Gruppe', 160, 10, 140, 95)
GUICtrlCreateRadio('Radiobutton 1', 172, 26, 120, 23)
GUICtrlCreateRadio('Radiobutton 2', 172, 49, 120, 23)
GUICtrlCreateRadio('Radiobutton 3', 172, 72, 120, 23)
GUICtrlCreateButton('OK', 120, 330, 70, 23)
_WinAPI_SetThemeAppProperties($STAP_ALLOW_NONCLIENT)
GUICtrlCreateTab(10, 118, 292, 206)
GUICtrlCreateTabItem('Tab1')
GUICtrlCreateTabItem('Tab2')
GUICtrlCreateTabItem('')
_WinAPI_SetThemeAppProperties($iTheme)
GUISetState(@SW_SHOW)
Do
Until GUIGetMsg() = $GUI_EVENT_CLOSE