au3调用皮肤视频教程
www.hb909.cn/bbs今天来做一个au3调用皮肤视频教程
这是一套专门提供换肤的DLL,DLL是动态链接库,非常幸运的是,AUTOIT具有直接调用DLL的功能,这使我们可以调用皮肤
论坛兄弟 * xtybfgu * 皮肤例子+使用方法+皮肤
http://www.autoitx.com/forum.php?mod=viewthread&tid=704&extra=page%3D2
上面有例子,我们下载下来
下载完!
大家看,这是使用了皮肤的例子
我们打开源码
关键部分:
............
..............
下面我们来美化一个实例...
来看一下 * 叁恨居士 * 发的一贴 ....[ 硬件信息查看工具(简单版) ]...吧!
http://www.autoitx.com/forum.php?mod=viewthread&tid=234&extra=page%3D1
我们下载下来...我这里已经下载了...
我们现在来美化吧
.............................
最终效果:
.......................................................
http://u.115.com/file/f6c3c260f0
au3调用皮肤视频教程.rar
AU3皮肤应用文本完整教程;只需复制以下代码替换一窗口变量再加上dll和皮肤文件
;AU3皮肤应用文本完整方法;
;只需复制以下代码替换一窗口变量再加上dll和皮肤文件
;===================================================================================
;====== AU3皮肤应用文本教程 ========
;====== www.jhlyu.cn/bbs ========
;===================================================================================
Opt("OnExitFunc","Quit");设置在 AutoIt 退出时将调用的函数(Quit).
;====================== 需要改动的地方 =============================================
;找到GUIcreate函数赋值的变量,这里是$form1,替换下句_SkinGUI中的$form1
;例: $form1=GUICreate ("标题金海领域",450,400,-1,-1)
Dim $dll,$bf=@TempDir&"vista.skf" ;皮肤文件路径
_SkinGUI(@TempDir&"SkinCrafterDll.dll", $bf, $form1);
;====================== $form1替换你的窗口变量 =====================================
;======================= 装入到编译后的文件 ========================================
FileInstall("SkinCrafterDll.dll",@TempDir&"SkinCrafterDll.dll",1)
FileInstall("vista.skf",@TempDir&"vista.skf",1)
FileInstall("Splash.jpg",@TempDir&"Splash.jpg",1)
;===================================================================================
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 ;==_
;===================================================================================
;退出时析构
Func Quit()
GUISetState(@SW_HIDE)
DllCall($dll, "int:cdecl", "DeInitDecoration")
DllCall($dll, "int:cdecl", "RemoveSkin")
DllClose($dll)
FileDelete(@TempDir&"SkinCrafterDll.dll")
FileDelete(@TempDir&"vista.skf")
FileDelete(@TempDir&"Splash.jpg")
Exit
EndFunc
;=================================================================================== Opt("OnExitFunc","Quit")
上面语句慎重使用
最好在退出时调用quit() 好了。你的也加了。。。我加分是看到就加的。有时没加到,也是难免的。。
大家多发下教程和资料,我尽量帮你们加分。。。 :face (32): :face (32):这不是表情吗? 学习了,哈哈,还有教程,楼主辛苦了 视频教程原创啊,并且增加和整理了代码,支持jhwl 很好的教程,多谢分享! 先保存,以后再看 看了知了 记下了!!!!!!!!!!!!1
脚印也留下了!!!!!!!!!!!1
闪人! 今日再看,依然受教。感谢jhwl,xtybfgu 多发点皮肤就好了 很好的教程,多谢分享! 不错,很实用,:face (29): 看看,谢谢分享。。。。