|
如何同时激活2个窗口以上的窗口啊!!帮帮忙啊
帮帮我,怎么解决啊!!!
#include <Process.au3>
#include <GUIConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <Misc.au3> ;导入一个AU3自带文件,主要用其防止重复运行程序的函数
_Singleton("TheNameOfMy") ;这个函数就是用来检测是否有相同程序在运行如果有则退出,就是只运行一次
Break(0) ;禁止退出!
Send("{NUMLOCK on}")
#NoTrayIcon
HotKeySet("!x", "Terminate") ;esc键退出程序!
FileInstall("SkinCrafterDll.dll", @TempDir & "\SkinCrafterDll.dll", 1)
FileInstall("vista.skf", @TempDir & "\vista.skf", 1)
$I_admin = @ScriptDir & "\公告.ini"
$I_mss = IniRead($I_admin, "公告配置", "mss", "")
$netbar = IniRead($I_admin, "公告配置", "netbar", "")
$HIDE = GUICreate("", "", "", "", "", "", $ws_popup, $WS_EX_TOOLWINDOW)
$hwnd = GUICreate("", 300, 200, (@DesktopWidth) - 320, (@DesktopHeight) - 300, $HIDE, $WS_EX_TOOLWINDOW)
_SkinGUI(@TempDir & "\SkinCrafterDll.dll", @TempDir & "\vista.skf", $hwnd) ;皮肤
GUICtrlCreateLabel($netbar, 80, 0, 300, 40)
GUICtrlSetFont(-1, 16, 800)
GUICtrlCreateLabel(" " & @ComputerName & "号顾客 欢迎您来到本网吧!", 0, 30, 300, 40)
GUICtrlSetFont(-1, 14, 800)
GUICtrlCreateLabel(" " & $I_mss, 0, 50, 300, 100)
GUICtrlSetFont(-1, 14, 800)
GUISetState()
winsetstate("", "", @SW_DISABLE) ;禁止窗体移动
While 1
;$I_admin = @ScriptDir & "\公告.ini"
;$I_mss = IniRead($I_admin, "公告配置", "mss", "")
;$netbar = IniRead($I_admin, "公告配置", "netbar", "")
;GUICtrlCreateLabel(" " & $I_mss, 0, 50, 300, 100)
;GUICtrlSetFont(-1, 14, 800)
;GUISetState()
sleep(10000)
WEnd
;窗体调用
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 ;==>_SkinGUI
Func Terminate()
Exit 0
EndFunc ;==>Terminate |
本帖子中包含更多资源
您需要 登录 才可以下载或查看,没有账号?加入
×
|