![]() Обработчик события OnClick кнопки BWind задает начальное значение свойства CommonAVI, сбрасывает счетчик на 1, делает компонент Animate1 видимым и активизирует его. Обработчик события OnClick кнопки BStop останавливает воспроизведение методом Stop. Обработчик события OnStop компонента Animate1 увеличивает счетчик на 1, в зависимости от значения счетчика загружает в компонент соответствующий клип Windows и активизирует компонент. Если все клипы уже воспроизведены, то компонент делается невидимым. Обработчик события OnClick кнопки BFile загружает в компонент видео файл, выбранный пользователем. Выполните приложение и проверьте его в работе. В качестве видео файла можете использовать файл ...\Demos\Coolstuf\Cool.avi, поставляемый с примерами Delphi (на Рисунок 4.22 изображен момент воспроизведения именно этого файла). |