|
发表于 2009-2-8 08:19:22
|
显示全部楼层
个人比较菜...这样也行..
可以返回..
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$Form1 = GUICreate("系统优化", 450, 350,192,114)
_SkinGUI("SkinCrafterDll.dll", "Vista.skf", $Form1)
Func _SkinGUI($SkincrafterDll, $SkincrafterSkin, $Handle)
$Dll = DllOpen($SkincrafterDll)
DllCall($Dll, "int:cdecl", "InitLicenKeys", "wstr", "1", "wstr", "", "wstr", "1@1.com", "wstr", "1")
DllCall($Dll, "int:cdecl", "InitDecoration", "int", 1)
DllCall($Dll, "int:cdecl", "LoadSkinFromFile", "wstr", $SkincrafterSkin)
DllCall($Dll, "int:cdecl", "DecorateAs", "int", $Handle, "int", 25)
DllCall($Dll, "int:cdecl", "ApplySkin")
EndFunc
$Button2 = GUICtrlCreateButton("关于程序>", 30,290 , 80, 25, 0)
$form2 = GUICreate("关于程序", 293, 127, 300, 200)
$Button3 = GUICtrlCreateButton("返回程序", 32, 32, 89, 33, 0)
$Button4 = GUICtrlCreateButton("退出程序", 160, 32, 89, 33, 0)
GUISetState(@SW_SHOW, $Form1)
While 1
$nmsg = GUIGetMsg()
Select
Case $nMsg = $GUI_EVENT_CLOSE
Exit
Case $nMsg = $Button2
Form2()
EndSelect
WEnd
Func Form2()
GUISetState(@SW_HIDE )
GUISetState(@SW_SHOW, $form2)
While 1
$nmsg = GUIGetMsg()
Select
Case $nMsg = $GUI_EVENT_CLOSE
Exit
Case $nMsg = $Button3
GUISetState(@SW_HIDE )
GUISetState(@SW_SHOW, $form1)
ExitLoop
Sleep(100)
case $nMsg = $Button4
go()
EndSelect
WEnd
Endfunc
Func go()
Exit
EndFunc
[ 本帖最后由 lcgkogoo 于 2009-2-8 08:33 编辑 ] |
|