#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
FileInstall("Skin.dll", @TempDir &"\Skin.dll",1)
FileInstall("aero.she", @TempDir &"\aero.she",1)
$sDll= DllOpen(@TempDir &"\Skin.dll")
DllCall($sDll, "int", "SkinH_AttachEx","str",@TempDir & "\aero.she","str","mhgd")
DllCall($sDll, "int", "SkinH_SetAero","int",1)
$Form1 = GUICreate("skin", 633, 454, 192, 114)
$ok=GUICtrlCreateButton("ok",50,60,100,50)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $ok
MsgBox(0,"ok","ok")
EndSwitch
WEnd
|