Создается форма приложения обычным образом.
Таблица 11.8. Значения свойств компонента MediaPlayer1
Свойство |
Значение |
||
Name |
MediaPlayer1 |
||
FileName |
delphi.avi |
||
DeviceType |
dtAVIVideo |
||
AutoOpen |
True |
||
Display |
Panel1 |
||
Visible |
False |
||
Следует особо обратить внимание на то, что размер области вывода анимации на панели определяется не значениями свойств width и Height панели (хотя их значения должны быть как минимум такими же, как ширина и высота анимации). Размер области определяется значением свойства
DisplayRect компонента MediaPlayer. Свойство DisplayRect ВО время разработки программы недоступно (его значение не выводится в окне Object Inspector). Поэтому значение свойства DisplayRect устанавливается во время работы программы в результате выполнения инструкции
MediaPlayer1.DisplayReet:=Rect(0,0,60,60).
Замечание
Чтобы получить информацию о размере кадров AVI-файла, надо, используя возможности Windows, открыть папку, в которой находится этот файл, щелкнуть правой кнопкой мыши на имени файла, выбрать команду Свойства и в появившемся диалоговом окне — вкладку Сводка, в которой выводится подробная информация о файле, в том числе и размер кадров.
Текст программы приведен в листинге 11.4.