#cs ____________________________________
脚本目的:利用.she换肤窗口
准备工作:
1.必须文件:皮肤文件.she和USkin.dll;
窗口换肤过程:
1.fileinstall()所需文件;
2.定义变量$skins和$DLL_存储换肤文件;
3.利用DLLCALL()启用皮肤。
注意事项:
1。注意用fileinstall()载入文件的源路径必须是字符不能有变量;
2.注意路径“\”符号必须存在,否则因路径导致无法找到更换皮肤所需文件;
3.注意退出时将载入文件删除。
#ce _______________脚本开始_________________
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
FileInstall("aero.she",@TempDir & "\aero.she")
FileInstall("Skin.dll",@TempDir & "\Skin.dll")
$skins=@TempDir & "\aero.she"
$Dll = DllOpen(@TempDir & "\Skin.dll")
DllCall($Dll, "int", "SkinH_AttachEx", "str", $skins, "str", "mhgd")
DllCall($Dll, "int", "SkinH_SetAero", "int", 1)
$Form1 = GUICreate("test .she skin", 633, 454, 192, 114)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
|