本帖最后由 guland 于 2010-12-23 08:37 编辑
以下东东 如有雷同 纯属扯淡
我只是破解了而已,不要问我一些技术问题,这程序不是我编写,使用中有这样那样的问题应该自己想办法解决或者到官方查找,别人的东西永远都没有自己的东西好,自己制作的皮肤自己用肯定没有问题,论坛里面也发了皮肤制作工具,大家可以研究下
下载下面DLL的人请先看下面的实例说明,免得使用时实现问题!
没有权限下载3.4版本DLL的人可以下载3.1版本的DLL,功能没什么区别!
见到有人需求皮肤,可是我没有地方法~~ 真是郁闷.#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <DateTimeConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <ProgressConstants.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
;==========判断系统是否安装有C++运行库===========
if not FileExists(@CommonFilesDir&"\Microsoft Shared\VC\msdia80.dll") Then
FileInstall("csp1.exe",@ScriptDir&"\csp1.exe");csp1.exe去我网盘下载吧,上传不了了.....
; http://0cf.ys168.com,进去找ACN专区,密码是acn
Run(@ScriptDir&"\csp1.exe")
EndIf
;=======================================
Dim $dll,$bf=("V-touch.skf") ;设置皮肤文件
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 429, 443, 192, 124)
_SkinGUI("SkinCrafterDll_31.dll", $bf, $Form1 ) ;调用皮肤DLL
$Label1 = GUICtrlCreateLabel("Label1", 16, 12, 36, 17)
$Input1 = GUICtrlCreateInput("Input1", 16, 40, 121, 21)
$Edit1 = GUICtrlCreateEdit("", 20, 78, 171, 123)
GUICtrlSetData(-1, "Edit1")
$Button1 = GUICtrlCreateButton("Button1", 64, 10, 75, 25)
$Checkbox1 = GUICtrlCreateCheckbox("Checkbox1", 160, 12, 97, 17)
$Checkbox2 = GUICtrlCreateCheckbox("Checkbox2", 160, 38, 97, 17)
$Radio1 = GUICtrlCreateRadio("Radio1", 244, 14, 113, 17)
$Radio2 = GUICtrlCreateRadio("Radio2", 244, 38, 113, 17)
$List1 = GUICtrlCreateList("", 212, 80, 169, 123)
$Combo1 = GUICtrlCreateCombo("Combo1", 22, 212, 145, 25)
$Group1 = GUICtrlCreateGroup("Group1", 20, 246, 153, 93)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$MonthCal1 = GUICtrlCreateMonthCal("2009/12/30", 196, 214, 222, 182)
$Tab1 = GUICtrlCreateTab(18, 352, 155, 51)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$TabSheet1 = GUICtrlCreateTabItem("TabSheet1")
$TabSheet2 = GUICtrlCreateTabItem("TabSheet2")
GUICtrlCreateTabItem("")
$Progress1 = GUICtrlCreateProgress(210, 408, 206, 17)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Quit()
EndSwitch
WEnd
Func _SkinGUI($SkincrafterDll, $SkincrafterSkin, $Handle)
$Dll = DllOpen($SkincrafterDll)
;=================请注意一下代码的注释!!============================
DllCall($Dll, "int:cdecl", "InitLicenKeys", "wstr", "1", "wstr", "", "wstr", "1@1.com", "wstr", "1");3.1版本DLL使用这行代码
DllCall($Dll, "int:cdecl", "InitLicenKeys", "wstr", "SKINCRAFTER", "wstr", "SKINCRAFTER.COM", "wstr", "support@skincrafter.com", "wstr", "DEMOSKINCRAFTERLICENCE");3.4版DLL使用这样代码
;===============以上代码只能使用其中一行!!==========================
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
Func Quit()
GUISetState(@SW_HIDE)
DllCall($dll, "int:cdecl", "DeInitDecoration")
DllCall($dll, "int:cdecl", "RemoveSkin")
DllClose($dll)
Exit
EndFunc
最后再说一下,送给那些只会挪用源码的人,请你们仔细看好了,加载皮肤后退出程序会报错的,不要直接用EXIT退出!!! 别老出来问那些愚蠢的弱智问题,教程里面写的明明白白的,为什么都不仔细看呢???
看好下面的代码!!! 自己考虑下代码是什么意思,为什么你们的源码里面有吗,如果有的话为什么不去调用??????????????????Func Quit()
GUISetState(@SW_HIDE)
DllCall($dll, "int:cdecl", "DeInitDecoration")
DllCall($dll, "int:cdecl", "RemoveSkin")
DllClose($dll)
Exit
EndFunc
下载不了3.4的人请下载3.1的基本上没有什么区别!!OK?? |
|手机版|小黑屋|AUTOIT CN
( 鲁ICP备19019924号-1 )谷歌
百度
发表于 2010-1-29 08:14:27
发表于 2010-1-29 08:33:01
.gif)
.gif)