Jump to content

Quicktime com


Recommended Posts

I;m trying to get Quicktime working within a gui, ive searched good but theres no reference on how to use quicktime as a com object. Any help would be appreciated:

CODE

#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=

$Form1 = GUICreate("AForm1", 152, 54, 193, 115)

$Obj1 = ObjCreate("QuickTime.QuickTime.5")

$Obj1_ctrl = GUICtrlCreateObj($Obj1, 0, 0, 148, 50)

GUISetState(@SW_SHOW)

#EndRegion ### END Koda GUI section ###

While 1

$nMsg = GUIGetMsg()

Switch $nMsg

Case $GUI_EVENT_CLOSE

exit

EndSwitch

WEnd

Link to comment
Share on other sites

I haven't played around much with quicktime objects...but you could use IE to play the video like this...

#include <IE.au3>
#include <GUIConstants.au3>

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("AForm1", 200, 200, 193, 115)

_IEErrorHandlerRegister ()
$oIE = _IECreateEmbedded ()
Global $GUIActiveX = GUICtrlCreateObj($oIE, 0, 0,200, 200)

_IENavigate ($oIE, @ScriptDir & "\test2.mov")


GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
exit
EndSwitch
WEnd
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...