【已解决】GUI标签透明问题,加皮肤后就不透明拉怎么会事??
本帖最后由 qq82015930 于 2010-9-16 16:42 编辑#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 ;==>quitGUI标签透明问题,加皮肤后就不透明拉怎么会事??
解决拉,换用的USkin.dll {:face (288):}怕淹没,自己顶一下 借用一句很经典的话:“纹了身穿上衣服还看得见?” 回复 3# 3mile
哦,谢谢,解决拉,换用的USkin.dll DllCall($Dll, "int", "SkinH_SetAero", "int", 0) 参数0 带带不启用透明效果 1代表启用
页:
[1]