| 您的位置：首页 >> 技术文章 >> ASP.NET |
|
|
vb 皮肤控件SkinH_VB6.dll的使用方法 |
| 来源：原创 发布人：www.ruanzhi.com
发表时间：2011-9-21 点击：
字体：大 中 小【双击滚动窗口】 |
|
|
首先我非常喜欢vb梦工厂这个网站，相信很多菜鸟和我一样遇到许多问题。我发现我这个问题站内有很多人都遇到了而且不知道怎么解决。 各位高手 我在本站下了许多she后缀的皮肤文件。要使用它们 必须下一个SkinH_VB6.dll。 我下的是破解版。在网上搜用法。目前只有一篇。而且按那样子做了 却出现不能找到SkinH_VB6.dll的提示。' E( i% y* _7 ?' Y! g o/ f
这里请问高手，如何使用 SkinH_VB6.dll ???? 首先贴出百度里的解决办法 注明！！！！ 此法我试过不行。！！！！！
! v+ b) B: N) G4 T* u3 \2 V百度方法：（原文）# {1 E/ l% G/ i1 v
首先确认你拿到了这个控件:SkinH_VB6.dll
9 r2 Q' e/ K7 c+ a6 x( h, t' W1 _" F" e, B+ i @
然后就是你拿到的皮肤了,比如你的皮肤名为:skin.she
" D M* M6 |# Y% Q/ j$ ]! v" C, y. ^
3 r& i' |4 q4 X3 i0 @# V调用方法是,先新建个模块:0 A9 Z: X8 q( B1 J4 s- Z
5 Z2 _+ n- ^( X3 ?8 \Public Declare Function SkinH_Attach Lib "SkinH_VB6.dll" () As Long
4 _4 l1 |% z' K0 e8 V) y. j& QPublic Declare Function SkinH_AttachEx Lib "SkinH_VB6.dll" (ByVal lpSkinFile As String, ByVal lpPasswd As String) As Long$ v, J% l9 m' `: L8 x$ W$ q W2 h
Public Declare Function SkinH_AttachExt Lib "SkinH_VB6.dll" (ByVal lpSkinFile As String, ByVal lpPasswd As String, ByVal nHue As Integer, ByVal nSat As Integer, ByVal nBri As Integer) As Long
) D! W6 ?, V# |, ]6 B. N- d8 ?7 |# aPublic Declare Function SkinH_AttachRes Lib "SkinH_VB6.dll" (lpRes As Any, ByVal nSize As Long, ByVal lpPasswd As String, ByVal nHue As Integer, ByVal nSat As Integer, ByVal nBri As Integer) As Long
o* S; S& q4 G0 k0 w6 vPublic Declare Function SkinH_AdjustHSV Lib "SkinH_VB6.dll" (ByVal nHue As Integer, ByVal nSat As Integer, ByVal nBri As Integer) As Long
5 I" F0 E( M: ~7 ]+ E, `# \; IPublic Declare Function SkinH_Detach Lib "SkinH_VB6.dll" () As Long' p' Z( D$ ^0 w! f
Public Declare Function SkinH_DetachEx Lib "SkinH_VB6.dll" (ByVal hWnd As Long) As Long
q8 a) }+ V2 G. Q9 W1 Q! S5 vPublic Declare Function SkinH_SetAero Lib "SkinH_VB6.dll" (ByVal hWnd As Long) As Long V; T( q. O% b5 ^% U
Public Declare Function SkinH_SetWindowAlpha Lib "SkinH_VB6.dll" (ByVal hWnd As Long, ByVal nAlpha As Integer) As Long
: t) A: E: d4 \- t9 |( VPublic Declare Function SkinH_SetMenuAlpha Lib "SkinH_VB6.dll" (ByVal nAlpha As Integer) As Long& i: y, h5 s& k! S5 [6 X: x6 Y/ ^; j2 }
Public Declare Function SkinH_GetColor Lib "SkinH_VB6.dll" (ByVal hWnd As Long, ByVal nPosX As Integer, ByVal nPosY As Integer) As Long
. u& ^; `- b! f$ APublic Declare Function SkinH_Map Lib "SkinH_VB6.dll" (ByVal hWnd As Long, ByVal nType As Integer) As Long+ F7 F" r. h5 Z" e" t% B! _
Public Declare Function SkinH_LockUpdate Lib "SkinH_VB6.dll" (ByVal hWnd As Long, ByVal nLocked As Integer) As Long6 P. W, x. D* C X9 ~3 Q
Public Declare Function SkinH_SetBackColor Lib "SkinH_VB6.dll" (ByVal hWnd As Long, ByVal nRed As Integer, ByVal nGreen As Integer, ByVal nBlue As Integer) As Long( c3 v; K+ `7 t, H, P2 m* X$ ?
Public Declare Function SkinH_SetForeColor Lib "SkinH_VB6.dll" (ByVal hWnd As Long, ByVal nRed As Integer, ByVal nGreen As Integer, ByVal nBlue As Integer) As Long
+ m* ~, X8 X$ ~& w$ z' z7 TPublic Declare Function SkinH_SetWindowMovable Lib "SkinH_VB6.dll" (ByVal hWnd As Long, ByVal bMove As Integer) As Long
( X2 I7 W3 E' j2 xPublic Declare Function SkinH_AdjustAero Lib "SkinH_VB6.dll" (ByVal nAlpha As Integer, ByVal nShwDark As Integer, ByVal nShwSharp As Integer, ByVal nShwSize As Integer, ByVal nX As Integer, ByVal nY As Integer, ByVal nRed As Integer, ByVal nGreen As Integer, ByVal nBlue As Integer) As Long$ `8 k. J& y1 o2 A* c# f) b
Public Declare Function SkinH_NineBlt Lib "SkinH_VB6.dll" (ByVal hDtDC As Long, ByVal left As Integer, ByVal top As Integer, ByVal right As Integer, ByVal bottom As Integer, ByVal nMRect As Integer) As Long! b9 k# {0 I* [: ]" B
Public Declare Function SkinH_SetTitleMenuBar Lib "SkinH_VB6.dll" (ByVal hWnd As Long, ByVal bEnable As Integer, ByVal nMenuY As Integer, ByVal nTopOffs As Integer, ByVal nRightOffs As Integer) As Long$ [3 b' P. H7 P; P
Public Declare Function SkinH_SetFont Lib "SkinH_VB6.dll" (ByVal hWnd As Long, ByVal hFont As Long) As Long
j# x5 P& y2 B+ D2 RPublic Declare Function SkinH_SetFontEx Lib "SkinH_VB6.dll" (ByVal hWnd As Long, ByVal szFace As String, ByVal nHeight As Integer, ByVal nWidth As Integer, ByVal nWeight As Integer, ByVal nItalic As Integer, ByVal nUnderline As Integer, ByVal nStrikeOut As Integer) As Long2 _1 S8 Z$ R2 g( E) c* V
Public Declare Function SkinH_VerifySign Lib "SkinH_VB6.dll" () As Long
5 T, n! ]+ W! t& e0 W, \' m' r6 T9 M* N2 t% ?- Y0 l+ ]" X
然后再窗体的中加入代码:: E Z+ R6 i `6 m7 [+ `
: F/ w1 W( ~6 D. m, \$ o4 a
SkinH_AttachEx app.path & "\skin.she", ""; N; [( {- M- c6 U3 ?
3 |+ Q8 Z; h& L0 a; I如果开启特效的话在加一句:
5 ~: x2 M+ F0 q& }% [$ b9 ]7 ^. y, U6 g
Call SkinH_SetAero(1)! B |
|
|
|
| Tag标签：vb 皮肤控件SkinH_VB6.dll的使用方法 |
|
 |
推荐产品 |
|
|
|
|
最新发布 |
|
|
|
相关信息 |
|
|
|
