Jump to content

Flash bgcolor "transparent"


Recommended Posts

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 now

flashguı.rar

Edited by mesale0077
Link to comment
Share on other sites

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 account

Sign in

Already have an account? Sign in here.

Sign In Now
 Share

  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...