Sign in to follow this  
Followers 0
playlet

---

5 posts in this topic

#1 ·  Posted (edited)

---

Edited by playlet

Share this post


Link to post
Share on other sites



Give it a try:

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <WinAPI.au3>

$obj = ObjCreate("ShockwaveFlash.ShockwaveFlash")
$GUI = GUICreate("Test", 160, 160)
GUICtrlCreatePic("bg.bmp", 0, 0, 160, 160)
GUICtrlSetState(-1,128)
$GUI2 = GUICreate("", 160, 160, 0, 0, $WS_POPUP, $WS_EX_MDICHILD+$WS_EX_LAYERED, $GUI)
GUISetBkColor(0x222211)
$ActiveX = GUICtrlCreateObj( $obj, 40, 40, 80, 80)
_WinAPI_SetLayeredWindowAttributes($GUI2,0x222211,100,0x01)
With $obj
    .bgcolor = "#222211"
    .Movie = @ScriptDir & "file.swf"
.Quality = 1
    .ScaleMode = 2
    .Loop = True
    .wmode = "transparent"
EndWith
GUISetState(@SW_SHOW, $GUI)
GUISetState (@SW_SHOW, $GUI2)

While 1
    If GUIGetMsg() = -3 Then
        $obj = 0
        GUIDelete()
        Exit
    EndIf
WEnd

Share this post


Link to post
Share on other sites

#3 ·  Posted (edited)

---

Edited by playlet

Share this post


Link to post
Share on other sites

#5 ·  Posted (edited)

---

Edited by playlet

Share this post


Link to post
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
Sign in to follow this  
Followers 0