【已解决】GUI标签透明问题，加皮肤后就不透明拉怎么会事？？

qq82015930

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 433, 292, 192, 114)
Dim $bf=@TempDir&"\vista.skf"                            
_SkinGUI(@TempDir&"\SkinCrafterDll.dll", $bf, $Form1 )   
$Pic1 = GUICtrlCreatePic("1.jpg", 8, 0, 385, 129)
GUICtrlSetState(-1, $GUI_DISABLE)
$Label1 = GUICtrlCreateLabel("测试标签", 128, 32, 76, 17)
GUICtrlSetBkColor(-1, $GUI_BKCOLOR_TRANSPARENT)   
$Button1 = GUICtrlCreateButton("Button1", 64, 176, 75, 25)
$Button2 = GUICtrlCreateButton("Button2", 224, 176, 75, 25)
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", "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&"\1.jpg")
        Exit
EndFunc   ;==>quit

GUI标签透明问题，加皮肤后就不透明拉怎么会事？？

解决拉，换用的USkin.dll

qq82015930

怕淹没，自己顶一下

3mile

借用一句很经典的话：“纹了身穿上衣服还看得见？”

qq82015930

回复 3# 3mile


   
哦，谢谢，解决拉，换用的USkin.dll

sdc7

DllCall($Dll, "int", "SkinH_SetAero", "int", 0) 参数0 带带不启用透明效果 1代表启用