How do you integrate a Flash movie into DX?
Sunday, February 25, 2007 by Ronan H | Discussion: DesktopX
I was reading a thread which touched on this but it was really about another issue so i thought i would create a separate thread for it.
Maybe its not even possible? I dunno, but im sure someone out there does, so if they are watching, please share the knowledge as this would be a great addition to my theme...
Thanks ever so much...
Ronan H
Reply #2 Tuesday, February 27, 2007 8:46 AM
Actually since i started this thread i found a widget that plays .SWF files and modified it to my needs and it works great. I think it uses the Web Control or something like that? The .SWF file isnt embedded via the Custom Files though, its just called from the script so it loads automatically and it can be changed in the script to point to a web based .SWF or a local one.
I have uploaded the new file to WC so it will take a couple of days to go live if they accept it. Im still gonna have a look at your suggestion though and see how it goes. Thanks for the knowledge...
Ronan H
Reply #3 Tuesday, February 27, 2007 9:18 AM
Glad your version worked.
Reply #4 Friday, March 2, 2007 10:58 AM
Simple Flash Player
Once again, thanks for the wise words...
Ro
Please login to comment and/or vote for this skin.
Welcome Guest! Please take the time to register with us.
There are many great features available to you once you register, including:
- Richer content, access to many features that are disabled for guests like commenting on the forums and downloading skins.
- Access to a great community, with a massive database of many, many areas of interest.
- Access to contests & subscription offers like exclusive emails.
- It's simple, and FREE!







Reply #1 Monday, February 26, 2007 2:11 PM
I created a simple widget that palyed a SWF video (bloodmobile.swf) using the code below:
Sub Object_OnScriptEnter
Set objFSO = CreateObject("Scripting.FileSystemObject")
If objFSO.FileExists(workFolder & "bloodmobile.swf") = False Then
objFSO.CopyFile Object.Directory & "bloodmobile.swf", workFolder & "virtual-bubblewrap-distv1.1.swf"
End If
Control.Navigate2 Object.Directory & "bloodmobile.swf"
End Sub
'Called when the script is terminated
Sub Object_OnScriptExit
End Sub