AgentSmith15 Posted December 11, 2005 Share Posted December 11, 2005 I have searched throught the forums for "transparent + png" and havn't found what I am looking for. I'm trying to use a transparent PNG as a form with a hidden taskbar. I have found that the code below to work fine with BMPs but the quality of the semi transparent areas is terrible. expandcollapse popup#NoTrayIcon #include <GUIConstants.au3> opt("GUIOnEventMode", 1) Dim $s_TempFile $bmp = _TempFile() FileInstall("gui.bmp", $bmp) ; Caption $caption = "Program name..." ; Caption $gui = GUICreate("Main GUI", 300, 440, -1, -1, $WS_POPUP + $WS_SYSMENU + $WS_MINIMIZEBOX, $WS_EX_LAYERED) GUISetOnEvent($GUI_EVENT_CLOSE, "Close") $caption = GUICtrlCreateLabel($caption, 12, 4, 180, 14) GUICtrlSetStyle($caption, -1, $WS_EX_TRANSPARENT); To show $caption text GUICtrlSetStyle($caption, $DS_SETFOREGROUND) GUICtrlSetFont($caption, 9, 400, -1, "Arial Bold") GUICtrlSetColor($caption, 0xF5F5F5) GUICtrlSetOnEvent($caption, "_Drag") ;GUICtrlSetBkColor($caption,0xFF00FF); To select $caption $min = GUICtrlCreateLabel("", 198, 4, 11, 11) GUICtrlSetOnEvent($min, "Minimize") GUICtrlSetTip($min, "Minimize") ;GUICtrlSetStyle($min, -1, $WS_EX_TRANSPARENT); To select $min ;GUICtrlSetBkColor($min,0xFF00FF); To select $min $close = GUICtrlCreateLabel("", 210, 4, 11, 11) GUICtrlSetOnEvent($close, "Close") GUICtrlSetTip($close, "Close") ;GUICtrlSetStyle($close, -1, $WS_EX_TRANSPARENT); To select $close ;GUICtrlSetBkColor($close,0xFF00FF); To select $close $pic = GUICtrlCreatePic($bmp, 0, 0, 300, 440) GUICtrlSetOnEvent($pic, "_Drag") $contextmenu = GUICtrlCreateContextMenu($pic) $min_item = GUICtrlCreateMenuItem("Min", $contextmenu) GUICtrlSetOnEvent($min_item, "Minimize") $close_item = GUICtrlCreateMenuItem("Close", $contextmenu) GUICtrlSetOnEvent($close_item, "Close") GUICtrlCreateMenuItem("", $contextmenu); separator $about_item = GUICtrlCreateMenuItem("About", $contextmenu) GUICtrlSetOnEvent($about_item, "About") GUISetState(@SW_SHOW) While 1 Sleep(1000) WEnd Func About() GUISetState(@SW_HIDE) SplashTextOn("btn", "Button clicked", 130, 19, -1, -1, 1, "", 12) Sleep(100) SplashOff() GUISetState(@SW_SHOW) EndFunc Func Close() GUISetState(@SW_HIDE) FileDelete($bmp) Exit EndFunc Func Minimize() GUISetState(@SW_MINIMIZE) EndFunc Func _TempFile() Local $s_TempName Do $s_TempName = "~" While StringLen($s_TempName) < 7 $s_TempName = $s_TempName & Chr(Round(Random(65, 90), 0)) WEnd $s_TempName = @TempDir & "\" & $s_TempName & ".tmp" Until Not FileExists($s_TempName) Return ($s_TempName) EndFunc Func _Drag() DllCall("user32.dll", "int", "ReleaseCapture") DllCall("user32.dll", "int", "SendMessage", "hWnd", $gui, "int", 0xA1, "int", 2, "int", 0) EndFunc [center][/center] Link to comment Share on other sites More sharing options...
Lord_Doominik Posted December 12, 2005 Share Posted December 12, 2005 png isn't supported, use gif please Link to comment Share on other sites More sharing options...
AgentSmith15 Posted December 12, 2005 Author Share Posted December 12, 2005 png isn't supported, use gif pleaseOkay PNG is supported but what other language does? I'm trying to make a script with a interesting GUI, but I like the hot key functions with AutoIt. [center][/center] Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now