mesale0077 Posted October 28, 2011 Share Posted October 28, 2011 (edited) hi Internet Booster program used a flash interface How do I make the background transparent flash Flash bgcolor "transparent" dont work #include <GUIConstants.au3> #include <GUIConstantsEx.au3> #include <GuiConstants.au3> #include <WindowsConstants.au3> #include <ButtonConstants.au3> #include <StaticConstants.au3> #include <WinAPI.au3> #include <GUIConstantsEx.au3> #include <EditConstants.au3> HotKeySet('{ESC}', '_Close') Opt('GUIOnEventMode', 1) $oRP = ObjCreate("ShockwaveFlash.ShockwaveFlash.1") $hGUI = GUICreate ("flashguı", 820, 600,-1, -1, $WS_POPUP, BitOR($WS_EX_LAYERED, $WS_EX_TOPMOST)) GUISetBkColor(345) _WinAPI_SetLayeredWindowAttributes($hGUI, 345, 255) $GUIActiveX = GUICtrlCreateObj( $oRP, 0, 0 , 800 , 580, BitOR($WS_EX_LAYERED, $WS_EX_TOPMOST)) GUISetBkColor(345) _WinAPI_SetLayeredWindowAttributes($GUIActiveX , 345, 255) With $oRP; Object tag pool .bgcolor = "transparent";dont work .Movie = @ScriptDir & '\RISB.swf'; .ScaleMode = 2 .Loop = True .wmode = "transparent"; EndWith GUISetState ();Show GUI While 1 $msg = GUIGetMsg() Select Case $msg = $GUI_EVENT_CLOSE ExitLoop EndSelect WEnd $oRP = 0; FREE THE OBJECT GUIDelete () Exit Func _Close() Exit EndFunc Func COMError() $fError = True EndFunc thank you nowflashguı.rar Edited October 28, 2011 by mesale0077 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