Что нового

Сменить разрешение ролика WMPlayer.OCX

Viktor1703

AutoIT Гуру
Сообщения
1 535
Репутация
410
Не пойму как сменить разрешение ролика или как называют, фрэйм по моему, или нет, не важно, когда воспроизводится ролик, то компонент берёт его разрешение и вставляет такого размера, как свои указывать? в MSDN вроде что то написано про это но так и не получилось у меня сделать, может у Вас получится MSDN WMPLayer.OCX

Код:
#Include <GUIConstantsEx.au3>
#Include <WindowsConstants.au3>

$WMPObj = ObjCreate("WMPlayer.OCX")
$hForm = GUICreate('', 800, 600)
;GUISetBkColor(0x000000)
GUICtrlCreateObj($WMPObj, 0, 0, 800, 600)
GUISetState()

With $WMPObj
	.enableContextMenu = (True)                ; Выключаем контекстное меню
	.windowlessVideo = (False)                  ; Не знаю
	.stretchToFit = (True)                      ; Что то про соответствие
	.url = (@ScriptDir & "\Andrea - Dokrai.mp4") ; Загрузить медиа файл
	.settings.volume = (100)                     ; Громкость звука
	;.controls.Play()                            ; Воспроизведение файла
	;.controls.currentPosition = (50)            ; Перемотка
	;.settings.Balance = 0                       ; Баланс
	;.settings.rate()                            ; Не знаю
	;.fullScreen = True                          ; Режим Full Screen
	;.enabled = True                              ; Не знаю
	;.settings.autostart()                       ; Авто старт фала
	;.settings.mute = False                      ; Вкл/Выкл звук
	;.settings.playCount()                       ; Не знаю
	.fullScreen = (False)
	.uiMode = ('none')
EndWith

;$WMPObj.currentMedia.durationString ; Возвращает продолжительность файла

While True
	WinSetTitle($hForm, "", "Прошло: " & $WMPObj.controls.currentPositionString()) ; Возвращаем время ролька (сколько прошло)
	Switch GUIGetMsg()
		Case -3
			Exit
	EndSwitch
WEnd
 

joiner

Модератор
Локальный модератор
Сообщения
3 345
Репутация
576
Viktor1703
когда решишь эту проблему покажи реализацию..я слабо в этом понимаю, но скрипт с осзона криво работает
 
Верх