Лекция: Кино в проекте
Все есть у нашего калькулятора — и картинки, и звук, и меню, и прыгающие кнопки. Для полного счастья не хватает кино. Нет проблем! Причем их нет двумя способами!
Первый способ. Project®Components®Microsoft Windows Common Controls-2 6.0. На Toolbox появится несколько новых элементов управления. Берите из них Animationи размещайте на форме — это ваш экран для кино. Его имя — Animation1. Этот элемент управления позволяет прямо в работающем проекте просматривать видеофайлы в формате AVI. Если у вас на компьютере нет порядочного кино в этом формате, то несколько маленьких анимационных роликов вы все-таки найдете в папке Videos, находящейся внутри папки, куда устанавливалась ваша Visual Studio. Скорее всего они находятся по такому адресу: «C:\Program Files\Microsoft Visual Studio\Common\Graphics\Videos».
Сделайте в проекте кнопку и назовите ее, например, «Видео». Вот процедура, которая при нажатии кнопки «Видео» бесконечно воспроизводит видеоролик FILECOPY.AVI:
Private Sub Видео_Click()
Animation1.Open«C:\Program Files\Microsoft Visual Studio\Common\Graphics\Videos\FILECOPY.AVI»
Animation1.Play
End Sub
Здесь полная аналогия с аудиоплеером, который я рассматривал в 2.8 Первая строка процедуры открывает файл, вторая его воспроизводит.
Во время демонстрации вы можете выполнять на калькуляторе другие свои дела. Чтобы «заморозить» демонстрацию, нужно выполнить оператор Animation1.Stop, а чтобы совсем прекратить и убрать с экрана — Animation1.Close.
Если вам нужно 3 раза воспроизвести кадры видеофильма с 5 по 12, вы пишете
Animation1.Play 3, 5, 12
Второй способ. Используйте нашего старого знакомого — мастера на все руки — Microsoft Multimedia Control 6.0, который тоже позволяет просматривать видеофайлы в формате AVI. Разместите его на форме и назовите, скажем, «Кино». Вот цепочка операторов, приводящая к результату:
Кино.DeviceType = «AVIVideo»
Кино.FileName = «C:\Program Files\Microsoft Visual Studio\Common\Graphics\Videos\ FILECOPY.AVI»
Кино.Command = «Open»
Кино.Command = «Play»
Просмотр идет в отдельном окне, размер и положение которого вы можете мышкой менять в процессе просмотра, что само по себе любопытно. К тому же, вы можете пользоваться управляющими кнопками элемента управления.