2010年11月 总版技术专家分月排行榜第二2010年9月 总版技术专家分月排行榜第二2010年8月 总版技术专家分月排行榜第二
2010年7月 总版技术专家分月排行榜第三
2010年6月 .NET技术大版内专家分月排行榜第二
2010年7月 .NET技术大版内专家分月排行榜第三2010年5月 .NET技术大版内专家分月排行榜第三
本帖子已过去太久远了，不再提供回复功能。请问如何浏览皮肤文件.skf?[已解决] - 已解决问题区 - 『 提问交流 』 -
AUTOIT CN AutoIt中文论坛|acn|au3|软件汉化 - 分享您的技术!
帖子1790&精华0&积分1135&威望70 点&金钱162 块&贡献100 分&阅读权限70&在线时间348 小时&注册时间&最后登录&
请问如何浏览皮肤文件.skf?[已解决]
本帖最后由 newuser 于
17:03 编辑
到现在还没有作个属于自己AU3的.SKF文件?该如何浏览他呢?如果用照片.JPG,如何把他转换成.skf格式呢?
感谢主动将修改帖子分类为[已解决]，请继续 ... &&金钱 + 10 块
帖子1790&精华0&积分1135&威望70 点&金钱162 块&贡献100 分&阅读权限70&在线时间348 小时&注册时间&最后登录&
看似调用皮肤成功,可是如何将自己的照片作成皮肤文件呢?没有搜索到有关内容!
以下上成功调用代码.#cs
学习制作皮肤
实践结果：换肤成功
第1步：将SkinCrafterDll.dll和皮肤文件LEDWidget.skf复制到程序所在目录---完成
第2步：在include头文件后插入如下代码：
& && && &FileInstall(&SkinCrafterDll.dll&, @TempDir & &\SkinCrafterDll.dll&, 1)
& && && &FileInstall(&LEDWidget.skf&, @TempDir & &\LEDWidget.skf&, 1)
& && && &$Dll = DllOpen(@TempDir & &\SkinCrafterDll.dll&)
& & & & & & & &&&
第3步：在#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate(&Form1&, 633, 450, 193, 125)后插入一行代码，注意：保持Form1前后一致
_SkinGUI(@TempDir & &\SkinCrafterDll.dll&, @TempDir & &\LEDWidget.skf&, $Form1)
第4步：1.将SkinCrafterDll.dll和皮肤文件LEDWidget.skf复制到程序所在目录
2.在include头文件后插入如下代码：
&&FileInstall(&SkinCrafterDll.dll&, @TempDir & &\SkinCrafterDll.dll&, 1)
& &FileInstall(&LEDWidget.skf&, @TempDir & &\LEDWidget.skf&, 1)
& &$Dll = DllOpen(@TempDir & &\SkinCrafterDll.dll&)
3.在#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate(&Form1&, 633, 450, 193, 125)后插入一行代码，注意：保持Form1前后一致
_SkinGUI(@TempDir & &\SkinCrafterDll.dll&, @TempDir & &\LEDWidget.skf&, $Form1)
4.在窗口函数代码段后插入如下代码：
&&;定义皮肤函数
Func _SkinGUI($SkincrafterDll, $SkincrafterSkin, $Handle)
& && &&&$Dll = DllOpen($SkincrafterDll)
& && &&&DllCall($Dll, &int:cdecl&, &InitLicenKeys&, &wstr&, &1&, &wstr&, &&, &wstr&, &&, &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& &;==&_SkinGUI
;皮肤退出
Func Quit()
& && &&&GUISetState(@SW_HIDE)
& && &&&DllCall($Dll, &int:cdecl&, &DeInitDecoration&)
& && &&&DllCall($Dll, &int:cdecl&, &RemoveSkin&)
& && &&&DllClose($Dll)
& && &&&FileDelete(@TempDir & &\SkinCrafterDll.dll&)
& && &&&FileDelete(@TempDir & &\LEDWidget.skf&)
& && && && && & Exit
EndFunc
总结：第3和第4步可根据自己需要进行位置调整，如把皮肤文件变成$Group1的背景，即把第3和第4步的代码加入到$Group1代码后，只不过
& && &_SkinGUI(@TempDir & &\SkinCrafterDll.dll&, @TempDir & &\LEDWidget.skf&, $Form1)里的$Form1要变成$Group1了
问题1：我从机器中找到其它的.skf文件重新命名为LEDWidget.skf，执行后怎么有的有效果，有的没有效果？
我的答案：难道是文件自身的问题。
;事件响应版系统工具，不带密码验证
Opt(&GUIOnEventMode&,1) ;采用事件模式响应
#include &ButtonConstants.au3&
#include &EditConstants.au3&
#include &GUIConstantsEx.au3&
#include &StaticConstants.au3&
#include &WindowsConstants.au3&
FileInstall(&SkinCrafterDll.dll&, @TempDir & &\SkinCrafterDll.dll&, 1)
FileInstall(&LEDWidget.skf&, @TempDir & &\LEDWidget.skf&, 1)
$Dll = DllOpen(@TempDir & &\SkinCrafterDll.dll&)
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate(&系统工具集 &, 631, 454, 192, 114)
_SkinGUI(@TempDir & &\SkinCrafterDll.dll&, @TempDir & &\LEDWidget.skf&, $Form1)
Func _SkinGUI($SkincrafterDll, $SkincrafterSkin, $Handle)
& && &&&$Dll = DllOpen($SkincrafterDll)
& && &&&DllCall($Dll, &int:cdecl&, &InitLicenKeys&, &wstr&, &1&, &wstr&, &&, &wstr&, &&, &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& &;==&_SkinGUI
;皮肤退出
Func Quit()
& && &&&GUISetState(@SW_HIDE)
& && &&&DllCall($Dll, &int:cdecl&, &DeInitDecoration&)
& && &&&DllCall($Dll, &int:cdecl&, &RemoveSkin&)
& && &&&DllClose($Dll)
& && &&&FileDelete(@TempDir & &\SkinCrafterDll.dll&)
& && &&&FileDelete(@TempDir & &\LEDWidget.skf&)
& && && && && & Exit
EndFunc
$Group1 = GUICtrlCreateGroup(&.exe类&, 48, 32, 169, 305)
$Button2 = GUICtrlCreateButton(&Windows更新程序&, 64, 56, 137, 33)
$Button3 = GUICtrlCreateButton(&远程桌面&, 64, 96, 137, 33)
$Button4 = GUICtrlCreateButton(&系统信息&, 64, 136, 137, 33)
$Button5 = GUICtrlCreateButton(&文件签名验证程序&, 64, 176, 137, 33)
$Button6 = GUICtrlCreateButton(&任务管理器&, 64, 216, 137, 33)
$Button7 = GUICtrlCreateButton(&系统配置实用程序&, 64, 256, 137, 33)
$Button8 = GUICtrlCreateButton(&磁盘垃圾清理&, 64, 296, 137, 33)
GUICtrlCreateGroup(&&, -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup(&.msc类&, 232, 32, 169, 305)
$Button9 = GUICtrlCreateButton(&本地服务设置&, 248, 56, 137, 33)
$Button10 = GUICtrlCreateButton(&共享文件夹管理器&, 248, 96, 137, 33)
$Button11 = GUICtrlCreateButton(&磁盘碎片整理&, 248, 136, 137, 33)
$Button12 = GUICtrlCreateButton(&计算机管理&, 248, 176, 137, 33)
$Button13 = GUICtrlCreateButton(&磁盘管理&, 248, 216, 137, 33)
$Button14 = GUICtrlCreateButton(&本地安全设置&, 248, 256, 137, 33)
$Button15 = GUICtrlCreateButton(&设备管理器&, 248, 296, 137, 33)
GUICtrlCreateGroup(&&, -99, -99, 1, 1)
$Group3 = GUICtrlCreateGroup(&.cpl类（控制面板）&, 416, 32, 169, 305)
$Button16 = GUICtrlCreateButton(&系统属性&, 432, 56, 137, 33)
$Button17 = GUICtrlCreateButton(&用户帐户&, 432, 96, 137, 33)
$Button18 = GUICtrlCreateButton(&自动更新&, 432, 136, 137, 33)
$Button19 = GUICtrlCreateButton(&网络连接&, 432, 176, 137, 33)
$Button20 = GUICtrlCreateButton(&区域和语言选项&, 432, 216, 137, 33)
$Button21 = GUICtrlCreateButton(&添加/删除程序&, 432, 256, 137, 33)
$Button22 = GUICtrlCreateButton(&Internet属性&, 432, 296, 137, 33)
GUICtrlCreateGroup(&&, -99, -99, 1, 1)
$Group4 = GUICtrlCreateGroup(&以上工具也可通过运行执行&, 48, 352, 537, 65)
$Input1 = GUICtrlCreateInput(&&, 64, 376, 337, 21)
$Button1 = GUICtrlCreateButton(&运行&, 416, 368, 105, 33)
GUICtrlCreateGroup(&&, -99, -99, 1, 1)
$Label1 = GUICtrlCreateLabel(&感谢hynq2000！仅为练手使用---采十青青橄榄&&&, 216, 424, 320, 66)
$Group5 = GUICtrlCreateGroup(&&, 32, 20, 569, 455)
GUICtrlCreateGroup(&&, -99, -99, 1, 1)
GUICtrlSetState(-1, $GUI_DISABLE)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
;###########进行事件关联##############
GUISetOnEvent($gui_event_close,&_Exit&) ;错误：将&&$ 写成 @
GUICtrlSetOnEvent($Button2,&_SysTools&) ;点击$Button2，函数_SysTools响应，注意，不需要书写_SysTools()，而且要用& &将函数括起来
GUICtrlSetOnEvent($Button3,&_SysTools&) ;另外注意是GUICtrlSetOnEvent(),不是GUISetOnEvent(),人家可是控件啊 ！
GUICtrlSetOnEvent($Button4,&_SysTools&)
GUICtrlSetOnEvent($Button5,&_SysTools&)
GUICtrlSetOnEvent($Button6,&_SysTools&)
GUICtrlSetOnEvent($Button7,&_SysTools&)
GUICtrlSetOnEvent($Button8,&_SysTools&)
GUICtrlSetOnEvent($Button9,&_SysTools&)
GUICtrlSetOnEvent($Button10,&_SysTools&)
GUICtrlSetOnEvent($Button11,&_SysTools&)
GUICtrlSetOnEvent($Button12,&_SysTools&)
GUICtrlSetOnEvent($Button13,&_SysTools&)
GUICtrlSetOnEvent($Button14,&_SysTools&)
GUICtrlSetOnEvent($Button15,&_SysTools&)
GUICtrlSetOnEvent($Button16,&_SysTools&)
GUICtrlSetOnEvent($Button17,&_SysTools&)
GUICtrlSetOnEvent($Button18,&_SysTools&)
GUICtrlSetOnEvent($Button19,&_SysTools&)
GUICtrlSetOnEvent($Button20,&_SysTools&)
GUICtrlSetOnEvent($Button21,&_SysTools&)
GUICtrlSetOnEvent($Button22,&_SysTools&)
GUICtrlSetOnEvent($Button1,&_SysTools&)
;###########事件关联完毕##############
;###########进入##############
;注意：没有这个循环，界面是一闪而过
While 1
& & & & Sleep(1)
WEnd
;###########主循环完毕##############
;###########定义响应事件的函数##############
Func _SysTools()
& & & & Switch @GUI_CtrlI这是事件模式，别忘了消息模式是 Switch @GUIGetMsg()
& & & & & & & & Case $Button2 ;开始执行系统的exe文件，一般它们都在&&\system32目录下
& & & & & & & & & & & & Run(@SystemDir&&\wupdmgr.exe&)
& & & & & & & & Case $Button3
& & & & & & & & & & & & Run(@SystemDir&&\mstsc.exe&)
& & & & & & & & Case $Button4
& & & & & & & & & & & & Run(@SystemDir&&\winmsd.exe&)
& & & & & & & & Case $Button5
& & & & & & & & & & & & Run(@SystemDir&&\sigverif.exe&)
& & & & & & & & Case $Button6
& & & & & & & & & & & & Run(@SystemDir&&\taskmgr.exe&)
& & & & & & & & Case $Button7
& & & & & & & & & & & & Run(@WindowsDir&&\pchealth\helpctr\binaries\Msconfig.exe&) ;msconfig命令不在\system32目录下
& & & & & & & & & & & & ;Run(@SystemDir&&\tsshutdn.exe&) 它是60秒倒计时关机命令
& & & & & & & & Case $Button8
& & & & & & & & & & & & Run(@SystemDir&&\cleanmgr.exe&)
& & & & & & & & Case $Button9 ;开始执行系统的msc文件，一般它们都在&&\system32目录下，通过shellexecute执行它们
& & & & & & & & & & & & ShellExecute(@SystemDir&&\services.msc&)
& & & & & & & & Case $Button10
& & & & & & & & & & & & ShellExecute(@SystemDir&&\fsmgmt.msc&)
& & & & & & & & Case $Button11
& & & & & & & & & & & & ShellExecute(@SystemDir&&\dfrg.msc&)
& & & & & & & & Case $Button12
& & & & & & & && &&&ShellExecute(@SystemDir&&\compmgmt.msc&)
& & & & & & & & Case $Button13
& & & & & & & & & & & & ShellExecute(@SystemDir&&\diskmgmt.msc&)
& & & & & & & & Case $Button14
& & & & & & & & & & & & ShellExecute(@SystemDir&&\secpol.msc&)
& & & & & & & & Case $Button15
& & & & & & & & & & & & ShellExecute(@SystemDir&&\devmgmt.msc&)
& & & & & & & & Case $Button16 ;开始执行系统的cpl文件，一般它们都在&&\system32目录下，通过control来执行.cpl文件
& & & & & & & & & & & & Run(&control sysdm.cpl&)
& & & & & & & & Case $Button17
& & & & & & & & & & & & Run(&control userpasswords2&)
& & & & & & & & & & & & ;Run(&control nusrmgr.cpl&)，不知道为什么它不好使！
& & & & & & & & Case $Button18
& & & & & & & & & & & & Run(&control wuaucpl.cpl&)
& & & & & & & & Case $Button19
& & & & & & & & & & & & Run(&control ncpa.cpl&)
& & & & & & & & Case $Button20
& & & & & & & & & & & & Run(&control intl.cpl&)
& & & & & & & & Case $Button21
& & & & & & & & & & & & Run(&control appwiz.cpl&)
& & & & & & & & Case $Button22
& & & & & & & & & & & & Run(&control inetcpl.cpl&)
& & & & & & & & Case $Button1 ;执行 “运行” 按钮
& & & & & & & & & & & & Run('cmd /c'&GUICtrlRead($input1)) ;刚开始，$Button1就是没有反映，原来是忘记将其进行事件关联了
& & & & & & & & & & & & ;RunWait(@ComSpec&& /c &&GUICtrlRead($Input1)) ;参数&&/c 表示要执行后面的“命令字符串”，而字符串是来自控件$input1内的内容
& & & & & & & & & & & & ;问题2：输入 msconfig 怎么不执行呢？
& & & & & & & & & & & & ;答：笨蛋！它不在/system32目录下，必须输入绝对路径才能执行，要不然再修改Path把msconfig所在的目录也加上
& & & & & & & & & & & & ;问题3：如何执行tasklist后让出现的窗口定住呢？Run('cmd /c pause')只是又打开一个DOS的暂停窗口啊？
& & & & & & & & & & & & ;答：其实在$input1内输入“tasklist & pause&就实现了，不过这还是DOS啊！
& & & & & & & & & & & & ;cmd /V:ON&&启用“延迟变量”的意思！
& & & & EndSwitch
EndFunc
Func _Exit()
& & & & Exit
EndFunc复制代码
帖子1790&精华0&积分1135&威望70 点&金钱162 块&贡献100 分&阅读权限70&在线时间348 小时&注册时间&最后登录&
这段代码更利于学习,但是我没有测试成功!#Region ### START Koda GUI section ### Form=
& && &&&$Form1 = GUICreate(&DrvT_2.6&, 360, 256, -1, -1, BitOR($WS_CAPTION, $WS_POPUP), 0)
& && &&&_SkinGUI(@WindowsDir & &\temp\SkinCrafterDll.dll&, @WindowsDir & &\temp\Flexi_ST.skf&, $Form1)
。。。。。。。。。。。。。。
。。。。。。。。。。。。
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
& & $nMsg = GUIGetMsg()
& & Switch $nMsg
& && &&&Case $GUI_EVENT_CLOSE
& && && && && && && && && && && && && && &&&Exit
& && &&&EndSwitch
WEnd
Func _SkinGUI($SkincrafterDll, $SkincrafterSkin, $Handle)
& & $Dll = DllOpen($SkincrafterDll)
& & DllCall($Dll, &int:cdecl&, &InitLicenKeys&, &wstr&, &1&, &wstr&, &&, &wstr&, &&, &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&&;==&_SkinGUI复制代码
帖子866&精华1&积分1486&威望153 点&金钱12982 块&贡献737 分&阅读权限100&在线时间550 小时&注册时间&最后登录&
论坛里面就有 搜索一下嘛
帖子1790&精华0&积分1135&威望70 点&金钱162 块&贡献100 分&阅读权限70&在线时间348 小时&注册时间&最后登录&
谢谢!我下载学习!
帖子1790&精华0&积分1135&威望70 点&金钱162 块&贡献100 分&阅读权限70&在线时间348 小时&注册时间&最后登录&
原来使用皮肤制作工具查看,不过谁有这方面的教程啊!不会用啊!
帖子80&精华0&积分75&威望10 点&金钱338 块&贡献15 分&阅读权限20&在线时间11 小时&注册时间&最后登录&
有没有大虾写点详细的东东，俺这菜菜鸟不懂
帖子260&精华0&积分504&威望18 点&金钱744 块&贡献338 分&阅读权限50&在线时间69 小时&注册时间&最后登录&
虽然看得不是很明。。还是顶一下。
帖子103&精华0&积分64&威望5 点&金钱269 块&贡献2 分&阅读权限20&在线时间58 小时&注册时间&最后登录&
正在学习中
帖子3285&精华0&积分3181&威望355 点&金钱17566 块&贡献828 分&阅读权限150&在线时间7188 小时&注册时间&最后登录&
学习了& & 这个好玩
帖子449&精华0&积分220&威望0 点&金钱9 块&贡献-5 分&阅读权限30&在线时间51 小时&注册时间&最后登录&
学习了& & 这个好玩
帖子56&精华0&积分78&威望10 点&金钱150 块&贡献30 分&阅读权限20&在线时间42 小时&注册时间&最后登录&
太精彩了！
[通过 QQ、MSN 分享给朋友]