Читать онлайн «Delphi. Трюки и эффекты». Страница 26

Процедуру создания корректного формата времени мы разобрали. Теперь необходимо выяснить, как можно узнать время, которое прошло с момента начала воспроизведения файла. Для этого обратимся к свойствам компонента MediaPlayer, а именно к Length (длина загруженного файла) и Position (текущая позиция в нем). Зная позицию, можно при помощи ранее рассмотренной функции FileLangToStr найти время воспроизведения (листинг 5.7).

Как можно заметить из листинга 5.7, после получения позиции в файле и его имени данные о времени воспроизведения и путь к файлу попадают на индикаторы lbMainTime и lbFileName соответственно.

Открытие и загрузка файла в мультимедийный компонент происходит при выполнении кода из листинга 5.8. Кроме того, обработчик вызывает известную нам процедуру UpdateViewTime и включает таймер (tmTimer. Enabled:= true).

Процедура обработки срабатывания таймера заключается в вызове функции обновления значений индикаторов (UpdateViewTime) (листинги 5.9 и 5.10).

Перемотка осуществляется при помощи двух кнопок. Для перемотки вперед на десять секунд необходимо нажать», назад – «(листинги 5.11 и 5.12).

Таким образом, разработанный проигрыватель располагает набором минимальных функций и возможностей. Но он обладает важным преимуществом, а именно простотой реализации. Как вы могли заметить, созданная программа может проигрывать и МРЗ-файлы. Это становится возможным благодаря использованию специального программного обеспечения – кодеков, установленных в операционной системе. Современная и достаточно распространенная операционная система Windows ХР содержит такие кодеки в комплекте базовой поставки. При использовании созданного проигрывателя в других операционных системах типа Windows, вероятно, понадобится самостоятельная установка кодеков.

На этом этапе принцип построения проигрывателя звуковых записей вам известен. Что касается просмотра видеозаписей, то благодаря универсальности компонента MediaPLayer он схож с воспроизведением звуковых файлов.

Не менее интересной задачей, рассмотренной в рамках этой главы, является разработка проигрывателя видеофайлов. Форматов видео присутствует достаточно большое количество, но самым распространенным из них, несомненно, является AVI. Учитывая этот факт, разработаем проигрыватель видеофайлов в AVI-фор-мате.

Учитывая то, что среда Delphi предоставляет высокоуровневый доступ к мультимедийным возможностям компьютера, сам принцип построения проигрывателя не меняется. Как и в случае со звуковым проигрывателем, будет использоваться знакомый вам ранее компонент MediaPLayer. Особенностью воспроизведения видео является только вывод изображения на экран в дополнение к звуковому сопровождению. Таким образом, необходимо определить, какие именно компоненты могу т служить в качестве контейнеров для воспроизведения в них видеопотока.

Приступим к созданию проигрывателя видео (рис. 5.4). Как и в случае звукового проигрывателя, нам понадобятся: компонент MediaPLayer, диалог для открытия файлов OpenDiaLog, компонент-контейнер для вывода изображения (используем GroupBox). Настраиваем форму приложения. Убираем кнопку максимизации, в данном случае она является лишней: присваиваем свойству biMaximaze, которое находится на вкладке Borderlcons, значение False. Устанавливаем BorderStyle равным bsSingle. Это не позволит пользователю изменять размеры формы. Для удобства использования проигрыватель появляется в центре экрана, следовательно, свойство Position устанавливаем KaKpoScreenCenter. В компоненте MediaPLayer оставляем видимыми только кнопки начала, паузы и остановки воспроизведения (аналогичным образом, как в проигрывателе звука). Помещаем на форму компонент GroupBox, свойство Caption устанавливаем пустой строкой, так как именно в этот компонент будет выводиться изображение.

Рис. 5.4. Вид видеопроигрывателя

Рассмотрим некоторые особенности созданного видеопроигрывателя. В качестве элемента-контейнера для динамического изображения использовался компонент GroupBox, поэтому его необходимо было назначить элементом вывода видео для MediaPLayer. Этот процесс сводится к присваиванию свойству Display компонента MediaPLayer экземпляра компонента GroupBox. Происходит это во время активизации формы (листинг 5.13).

В предложенном фрагменте текста программы переменная gbViewVideo является экземпляром компонента GroupBox.

В качестве доказательства простоты, удобства и гибкости использования компонента MediaPLayer приведем весь исходный текст приложения (листинг 5.14).

Из предложенного фрагмента видно, что, обладая минимальным объемом исходного текста, видеопроигрыватель может выполнять все необходимые базовые функции.

• Графические объекты

• Аппаратно-независимыи графический вывод

• Контекст устройства

• Графические режимы

• Работа со шрифтами

• Рисование примитивов

• Работа с текстом

• Работа с растровыми изображениями

• Альфа-смешивание

Операционная система Windows с самого начала создавалась прежде всего как графическая оболочка. И как следствие, в ней осуществляется графическое представление информации. Вполне естественным является то, что почти любое приложение использует экран для отображения данных, с которыми оно работает. По крайней мере, сама операционная система отображает на экране визуальные элементы приложений. Windows обеспечивает универсальность представления информации как на экране, так и на других устройствах вывода, например, на принтере. Стоит отметить, что для этого используются одни и те же примитивы отображения. Система самостоятельно определяет целевое устройство и активизирует соответствующий ему модуль. ОС Windows является многозадачной и предъявляет к приложениям ряд основных требований, исключающих конфликты при использовании функций вывода. Однако это вовсе не означает, что Windows обеспечивает приложения только набором функций вывода на экран или печать – система полностью управляет всем выводом. Наверное, более правильно будет сказать, что приложения используют в качестве первичного вывода окно, а не непосредственно экран. Каждое устройство вывода в Windows характеризуется набором текущих параметров, с использованием которых происходит собственно вывод. Причем в каждый конкретный момент времени только одному приложению соответствует некоторое устройство вывода, что исключает одновременный доступ к последнему, изменение параметров одним приложением перед началом процесса вывода другим.