SkinCrafterDll.dll 3.4发布!!!
本帖最后由 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
EndFuncPS:还差一个附件上传完之后说什么也不显示,无奈了
最后再说一下,送给那些只会挪用源码的人,请你们仔细看好了,加载皮肤后退出程序会报错的,不要直接用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?? 谢谢楼主啊，沙发我来坐！ 好强的楼主:face (3): 楼主好强大呀！谢谢了！ 看着很不错。哈哈 那个支持网络上啊那个最新的皮肤不啊支持的话下载一个！！！ 下载个侃侃 呵呵后侃侃最新的 皮肤可用不。。。。。 妈 啊怎么被扣了60啊 我还没下载到呢！！！！！ 回复 6# kswdiy
支持新皮肤,但不知道是不是所有的都支持,毕竟我不能按个试 60金币 值了！:face (36): 能不能用呀，用过的人回来顶一个呀 回复 11# jybb001
擦不能用我发它干什么??? 回复 12# guland
呵呵，我的错，谢谢你， 高版本和低版本有什么区别？ 回复 14# qq342252004
高版本的皮肤低版本用不了