#NoTrayIcon
#Region ;**** 参数创建于 ACNWrapper_GUI ****
#AutoIt3Wrapper_icon=..\17292.ICO\winxp\worldofaqua1\WorldOfAqua1\Aqua OS.ico
#AutoIt3Wrapper_outfile=调用游戏菜单.exe
#AutoIt3Wrapper_Res_Fileversion=0.0.0.0
#EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
#include <GUIConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
$g_szVersion = "调用游戏菜单"
If WinExists($g_szVersion) Then Exit
AutoItWinSetTitle($g_szVersion)
Opt("GUIOnEventMode", 1) ; 切换为 OnEvent 模式
Dim $Dll,$SkincrafterDll="SkinCrafterDll.dll",$SkincrafterSkin="Thai_Style_ST.skf",$hanle=WinGetHandle("调用游戏菜单","")
$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", $hanle, "int", 25)
DllCall($Dll, "int:cdecl", "ApplySkin")
$hwnd=GUICreate("调用游戏菜单",650,380,@DesktopWidth/2-500,@DesktopHeight/2-380)
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int",500, "long", 0x00080000)
GUISetState()
GUICtrlCreateGroup("",3,3,647,377)
Dim $b = 1,$Label=GUICtrlCreateLabel("正在加载最新配置!请稍等。。。",120,240,300,40,$SS_CENTERIMAGE)
GUICtrlSetFont($Label,22,400,0,"华文行楷")
;run("\\Server\e\迅闪\游戏菜单\游戏菜单.exe","\\Server\e\迅闪\游戏菜单")
GUISetOnEvent($GUI_EVENT_CLOSE, "quit")
While 1
Sleep(5)
if $b = 160 Then $b = 1
ControlMove ("调用游戏菜单","正在加载最新配置!请稍等。。。",$Label,120,240-$b,500, 40)
$b +=1
If WinActivate("齐心网吧游戏菜单","") Then quit()
WEnd
Func quit()
DllCall("user32.dll", "int", "AnimateWindow", "hwnd", $hwnd, "int", 1000, "long", 0x00050010);implode
GUISetState(@SW_HIDE)
DllCall($dll, "int:cdecl", "DeInitDecoration")
DllCall($dll, "int:cdecl", "RemoveSkin")
DllClose($dll)
Exit
EndFunc