SetSystemVisualStyle

[musicstashall]

Hello. I was looking for ways to apply visual style from the script, found here only this:

$aCall = DllCall("uxtheme.dll", "int", 65, _
        "wstr", "C:\WINDOWS\resources\Themes\Aero 7\aero 7.msstyles", _
        "wstr", "NormalColor", _
        "wstr", "NormalSize", _
        "int", 0)

If @error Then
    ConsoleWrite("!Error = " & @error & @CRLF)
Else
    ConsoleWrite(">Returned  " & $aCall[0] & @CRLF) ; 0 is success
EndIf

It works, but not perfect. The interface elements are made from a visual style, but the color scheme does not change.

Maybe it can not work on windows 10. Could you suggest other variants of calls to uxtheme.dll or find a way to get the color composition from the .msstyle file, similar to the function GetSysColor?