Delphi. Делаем TVideoPanelWMP. Cвой компонент видео-проигрыватель на основе WindowsMediaPlayer

Сам WindowsMediaPlayer в качестве компонента мы установили в статье про создание MP3 плеера, здесь же мы создадим видео плеер с изменяемыми размерами, который будет проигрывать MP4.

Получится примерно так…

5

6

Проигрыватель находится на панели, которую можно растягивать за нижний правый уголок. WMP проигрывает многие форматы, но я поставил пока ограничение в коде использования компонента ограничение на ‘.mp4’ так как мне в дальнейшем нужно транслировать файл в браузер, а многие браузеры поддерживают ‘.mp4’.  Код создания компонента получился таким…

Код разработки компонента

Как пользоваться компонентом?

Пример тестовой программы…

 

This entry was posted in Delphi, Компонентостроение. Bookmark the permalink.