Ok then the aggressive way =P:
type in cmd(copy & paste):
cmd=
(LTrim
%SystemRoot%\system32\rundll32.exe %SystemRoot%\system32\shell32.dll,Control_RunDLL %SystemRoot%\system32\desk.cpl desk,@Themes /Action:OpenTheme /file:"C:\Windows\Resources\Themes\aero.theme"
)
hwnd:=WinExist("a")
Run...