#include <GUIConstantsEx.au3>
#include <ListViewConstants.au3>
#include <GuiListView.au3>
#include <GuiImageList.au3>
Global $TempDir = @WindowsDir & "\Temp\OemChanger"
DirCreate(@WindowsDir & "\Temp")
DirCreate(@WindowsDir & "\Temp\OemChanger")
$Form1 = GUICreate("Temp", 398, 252, 233, 181)
FileInstall("SkinCrafter.dll", $TempDir & "\SkinCrafter.dll", 1)
FileInstall("Skin1.skf", $TempDir & "\Skin.skf", 1)
_SkinGUI($TempDir & "\SkinCrafter.dll", $TempDir & "\Skin.skf", $Form1)
$ListView1 = GUICtrlCreateListView("AAA|BBB", 8, 8, 385, 185, BitOR($LVS_SHOWSELALWAYS, $LVS_NOSORTHEADER, $LVS_REPORT))
_GUICtrlListView_SetTextColor($ListView1, 0x000FF0)
_GUICtrlListView_SetColumnWidth($ListView1, 0, 40)
_GUICtrlListView_SetColumnWidth($ListView1, 1, 315)
_GUICtrlListView_SetExtendedListViewStyle($ListView1, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_SUBITEMIMAGES, $LVS_EX_GRIDLINES))
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Func _SkinGUI($SkincrafterDll, $SkincrafterSkin, $Handle)
$SkinDll = DllOpen($SkincrafterDll)
DllCall($SkinDll, "int:cdecl", "InitLicenKeys", "wstr", "1", "wstr", "", "wstr", "1@1.com", "wstr", "1")
DllCall($SkinDll, "int:cdecl", "InitDecoration", "int", 1)
DllCall($SkinDll, "int:cdecl", "LoadSkinFromFile", "wstr", $SkincrafterSkin)
DllCall($SkinDll, "int:cdecl", "DecorateAs", "int", $Handle, "int", 25)
DllCall($SkinDll, "int:cdecl", "ApplySkin")
EndFunc ;==>_SkinGUI
Func _SkinQuit()
Local $SkinDll
GUISetState(@SW_HIDE)
DllCall($SkinDll, "int:cdecl", "DeInitDecoration")
DllCall($SkinDll, "int:cdecl", "RemoveSkin")
DllClose($SkinDll)
EndFunc ;==>_SkinQuit
Func _PreExit()
_SkinQuit()
Sleep(200)
FileDelete($TempDir & "\SkinCrafter.dll")
FileDelete($TempDir & "\Skin.skf")
DirRemove($TempDir, 1)
EndFunc ;==>_PreExit
运行截图: