[Элементы GUI] Как поместить видео (не AVI) в GUI

[Max98]

Привет всем!

Хочу поместить видео (не AVI) в GUI. Подскажите, пожалуйста, как это сделать.

 

[Garrett]

Max98 [?]

Хочу поместить видео (не AVI)

QTOControl.QTControl.1 - QT
WMPlayer.OCX.7 - WMP
ShockwaveFlash.ShockwaveFlash.10 - Flash
Главное чтобы кодеки были под требуемый формат.

 

[Yashied]

#Include <DSEngine.au3>

$sFile = FileOpenDialog('Select Video File', @ScriptDir, 'Video Files (*.avi;*.mpg;*.wmv;*.mov;*.3gp;*.asf;*.mp4;*.flv;*.rv)')
If Not $sFile Then
	Exit
EndIf

$hForm = GUICreate('MyGUI')
Engine_Startup(@ScriptDir & '\DSEngine_UDF.dll')
Engine_LoadFile($sFile, $hForm)
$aSize = Engine_GetVideoSize()
WinMove($hForm, '', (@DesktopWidth - $aSize[0]) / 2, (@DesktopHeight - $aSize[1]) / 2, $aSize[0], $aSize[1])
Engine_SetRects(0, 0, 0, 0, 0, 0, $aSize[0], $aSize[1])
GUISetState()

Engine_StartPlayback()

Do
Until GUIGetMsg() = -3

Engine_Shutdown()

 

[kpuk]

А можно ли в какойнить контрол поместить видео?? или тока в гуи?
кстати самый зачотный вариант видео проигрывателя! просто в использовании и функционально! Спасибо!

 

[zbz]

Всё таки нашёл компоненты скрипта, вдруг кому нибудь пригодятся.

DSEngine.au3
DSEngine_UDF.dll
DSEngineConstants.au3
SimpleExample.au3

 

[ra4o]

У меня почему-то mp4 не читает...

 

[zbz]

Можно ли, видео по кругу пустить (типа Loop)?. Кстати, нужно ещё закрывалка этого окна.