找回密码
 加入
搜索
楼主: lxh495349465

[原创] 给大家写了个皮肤DLL,方便一些想偷懒写代码的朋友

 火... [复制链接]
发表于 2011-12-24 23:38:13 | 显示全部楼层
很好看了!很好看了!
发表于 2011-12-24 23:38:37 | 显示全部楼层
很好看了!怎么只有一块钱啊,不是五块吗,我倒!
发表于 2012-2-21 11:19:03 | 显示全部楼层
比默认的漂亮啊
发表于 2012-2-21 20:19:50 | 显示全部楼层
是不是适合任何语言的
发表于 2012-3-15 21:52:13 | 显示全部楼层
感谢提供!马上试试!
发表于 2012-3-16 21:28:19 | 显示全部楼层
研究研究 谢谢楼主分享
发表于 2012-3-17 19:18:50 | 显示全部楼层
我晕,怎么不稳定?
发表于 2012-3-17 19:55:28 | 显示全部楼层
难道是我错了源码
发表于 2012-3-19 13:37:46 | 显示全部楼层
顶,好东西!
发表于 2012-3-19 13:43:34 | 显示全部楼层
应该把DLLCALL放在窗体显示的前面,要不打开要一段时间才能启动皮肤。
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <ProgressConstants.au3>
#include <SliderConstants.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
FileInstall("wmSkin.dll",@SystemDir&"\wmSkin.dll")
$Form1 = GUICreate("Form1", 475, 306, 192, 114)
$Label1 = GUICtrlCreateLabel("Label1", 8, 8, 36, 17)
$Input1 = GUICtrlCreateInput("Input1", 0, 40, 73, 21)
$Edit1 = GUICtrlCreateEdit("", 0, 80, 81, 97)
GUICtrlSetData(-1, "Edit1")
$Button1 = GUICtrlCreateButton("Button1", 96, 8, 57, 25)
$Checkbox1 = GUICtrlCreateCheckbox("Checkbox1", 168, 8, 65, 25)
$Radio1 = GUICtrlCreateRadio("Radio1", 248, 8, 65, 33)
$Group1 = GUICtrlCreateGroup("Group1", 96, 72, 217, 113)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Progress1 = GUICtrlCreateProgress(0, 192, 313, 41)
$Slider1 = GUICtrlCreateSlider(0, 248, 313, 49)
$Tab1 = GUICtrlCreateTab(320, 0, 145, 297)
$TabSheet1 = GUICtrlCreateTabItem("TabSheet1")
$TabSheet2 = GUICtrlCreateTabItem("TabSheet2")
GUICtrlSetState(-1,$GUI_SHOW)
GUICtrlCreateTabItem("")
DllCall ( "wmSkin.dll", "none", "wmSkin" , "int", 1,"int", 1) 
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###


;调用函数名:wmSkin
;参数1(皮肤编号)类型为整数型;0到25
;参数1(阴影效果)类型为整数型:0或1
While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
        Case $Button1
                        MsgBox(64,"fwef","fcewvcfew")
        EndSwitch
WEnd
发表于 2012-3-29 15:44:29 | 显示全部楼层
谢谢分享!
发表于 2012-3-29 16:09:29 | 显示全部楼层
回复 1# lxh495349465
学习一下!
发表于 2012-4-10 23:07:32 | 显示全部楼层
很不错啊
发表于 2013-9-17 10:40:45 | 显示全部楼层
谢谢提供,学习了
发表于 2013-12-21 20:26:19 | 显示全部楼层
谢谢楼主了
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-22 16:36 , Processed in 0.070797 second(s), 15 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表