Владимир Коробицын
А теперь Вы сможете построить приложение, которое позволит пользователю:
1. Просматривать файлы рисунков в форматах BMP, WMF.
2. Просматривать видео-файлы в формате AVI.
3. Прослушивать музыкальные файлы в форматах MID, RMI.
4. Прослушивать звуковые файлы в формате WAV.
Создайте папку Browser, в которую позднее поместите проект этого приложения. В проект добавите файл Mci.vbx (поддержка мультимедийных объектов) и файл Cmdialog.vbx (поддержка окна общих диалогов). На форме Form1 расположите объекты Image1 (Образ), MMControl1 (Мультимедийные объекты) и CMDialog1 (Окно общих диалогов). Объект MMControl1 сделайте «невидимым». В данном приложении объект CMDialog1 Вы будете использовать для активизации окна «Открытие файла».
Сначала постройте в приложении систему меню по следующей схеме:
Caption (Надпись) Name (Имя в программе)
Посмотреть Look
----Картинки Pictures
----Видео Video
Послушать Listen
----Мелодии Mid
----Звуки Wav
Вы помните, что надписи в меню и соответствующие им имена процедур прерывания в программе могут быть произвольными. Во вновь созданную процедуру прерывания Pictures_Click поместите программный код:
CMDialog1.Filename = "*.bmp;*.wmf" ‘ указание типов файлов
CMDialog1.Action = 1 ‘ активизация окна диалога ОТКРЫТИЕ ФАЙЛА
Image1 = LoadPicture(CMDialog1.Filename) ‘ загрузка рисунка в Image1
Form1.Width = Image1.Width + 120 ‘ установление ширины формы
Form1.Height = Image1.Height + 720 ‘ установление высоты формы
‘ информация о длине файла
Form1.Caption = FileLen(CMDialog1.Filename) & " байт "
‘ добавление пути и имени файла
Form1.Caption = Form1.Caption + CMDialog1.Filename
MMControl1.Visible = False
Данная процедура прерывания вызовется тогда, когда пользователь в меню «Посмотреть» выберет команду «Картинки». Пустые строки в программе совершенно необязательны. В данном случае они используются для наглядности и лучшей удобочитаемости текста программного кода. Первая строка указывает объекту общего диалога CMDialog1 разрешенные форматы для открываемых файлов – BMP и WMF. Знак «*» указывает на то, что имя файла может быть любым. Вторая строка вызывает стандартное окно общего диалога «Открытие файла», посредством которого пользователь отыскивает на нужном диске и в нужной папке необходимый файл. Третья строка загружает файл рисунка, выбранный пользователем, и помещает его в объект Image1 (Образ), расположенный на форме Form1. Это возможно с помощью оператора LoadPicture (Загрузка рисунка).
Следующие две строки приводят в соответствие размеры окна приложения и размеры помещаемого в это окно рисунка.
Шестая строка программного кода посредством оператора FileLen (Длина файла) устанавливает размер выбранного файла и помещает эту информацию в строку заголовка формы Form1. Седьмая строка добавляет в строку заголовка информацию о пути и имени этого файла. Как работают последние две строки, Вы уже знаете.
Желательно в стандартную процедуру прерывания Image1_Click полностью скопировать вышеприведенный программный код. Тогда пользователю при последующих обращениях к окну общего диалога «Открытие файла» будет необязательно прибегать к услугам меню. Достаточно будет щелкнуть мышью по полю уже вызванного рисунка, как вновь появится окно общего диалога «Открытие файла».
Продолжим работу по обработке выборов меню. Процедуру прерывания Video_Click заполните программным кодом:
CMDialog1.Filename = "*.avi" ‘ указание типа открываемых файлов
CMDialog1.Action = 1 ‘ активизация окна диалога ОТКРЫТИЕ ФАЙЛА
MMControl1.Filename = CMDialog1.Filename ‘ передача имени файла
MMControl1.Command = "Close"
MMControl1.Command = "Open"
MMControl1.Command = "Play"
MMControl1.Visible = True
Form1.Caption = FileLen(CMDialog1.Filename) & " байт "
Form1.Caption = Form1.Caption + CMDialog1.Filename
Form1.Width = 5805
Form1.Height = 3780
Третья строка имя файла, выбранное пользователем в общем окне диалога «Открытие файла», передает объекту MMControl1. Смысл остальных строк Вам уже должен быть понятен. Данная процедура прерывания Video_Click сработает при выборе пользователем в меню «Посмотреть» команду «Видео».
Завершите обработку выборов меню. Для двух оставшихся процедур прерывания Mid_Click и Wav_Click потребуется такой же программный код, как и для процедуры Video_Click. Изменения коснутся только первой строки. Для процедуры Mid_Click строка примет вид:
CMDialog1.Filename = "*.mid" ‘ указание типа открываемых файлов
А для процедуры Wav_Click:
CMDialog1.Filename = "*.wav" ‘ указание типа открываемых файлов
Свойству Caption (Надпись) объекта Form1 придайте значение «Универсальный прослушивающий просмотрщик». Создайте исполняемый EXE-файл. Для успешной работы приложения в его папку наряду с исполняемым файлом должны присутствовать файлы Vbrun300.dll, CMDialog.vbx и Mci.vbx. Опробуйте приложение в работе.
Домашнее задание
1. В систему меню поместите команду «Выход».
2. Добавьте в приложение второе окно, содержащее помощь по работе с приложением. Сделайте так, чтобы это окно появлялось при выборе в меню команды «Помощь».
3. Добавьте в приложение третье окно, содержащее сведения о Вашем авторстве на программу. Это окно пользователь должен вызывать из меню командой «О программе».
4. Сделайте так, чтобы сразу после загрузки приложения начинала звучать выбранная на Ваше усмотрение мелодия и в окне Form1 появлялся какой-либо рисунок или фотография.
5. В меню поместите команду «Печать» с помощью, которой пользователь смог бы распечатывать просматриваемые рисунки на бумагу.
Другие работы по теме:
Ритм
Ритм - универсальный закон развития мироздания. ХХ век очень многое внес в изучение биологических и космологических ритмов, ритмов в искусстве и в стихотворной строке.
Виды банков 3
Виды банков Различают: центральные банки, осуществляющие государственное регулирование банковской сферы и денежную эмиссию. коммерческие банки, осуществляющие предпринимательскую банковскую деятельность;
Почему философию принято называть теоретическим мировоззрением
3. Как Вы думаете, ? Вряд ли можно спорить с тем, что философские взгляды играют важную роль в мировоззрении людей. Значительность этой роли нередко побуждает к тому, чтобы саму философию понять и определить с помощью отсылки к мировоззрению. Представить её, как теоретическую форму мировоззрения или как его теоретическое ядро.
Бесконечность в философии
Бесконечность в философии-понятие, употребляемое в двух различных смыслах: качественная Бесконечность, выражаемая в законах науки, количественная Бесконечность, выступающая как неограниченность процессов и явлений.
Универсальный человек
Введение 1 Известные полиматы Список литературы Введение Универсальный человек, энциклопедист, полимат (polymathēs, греч. πολυμαθής)[1] — тот, чьи интеллектуальные способности, интересы и деятельность не ограничены одной областью знаний и единственной областью их применения, но и добивающийся ощутимых практических результатов по всем направлениям.
Универсальный блок питания
Министерство общего и профессионального образования Томский политехнический университет Курсовая работа по электронике «Универсальный блок питания»
Кольцевые превенторы
УНИВЕРСАЛЬНЫЕ ( Кольцевые превенторы предназначены для герметизации устья скважины при наличии колонны труб или в отсутствие ее. Установлена следующая система обозначения кольцевых превенторов: ПУ - превентор кольцевой (универсальный); конструктивное исполнение;
Глобализация и национальная идентичность
Во всем мире сегодня можно увидеть процессы одной и той же направленности: идет необычайное усиление этнических чувств, проявляющееся во всех сферах человеческой жизни; значительно повысилась роль национального фактора.
Введение
Перечень сокращений, условных обозначений, символов терминов АПР - автомат подземного ремонта скважин ВНЗ – водонефтяная зона ВНИИ – всесоюзный научно-исследовательский институт
Искусственные языки
Для облегчения международных контактов в последние два столетия человечество стремиться создать единый, универсальный искусственный язык.
Универсальный блок питания
Министерство общего и профессионального образования Томский политехнический университет Курсовая работа по электронике «Универсальный блок питания»
Измерительная и проверочная аппаратура
Средства измерений, предназначенные для комплексов оборудования систем коммутации, систем передачи на телефонной сети. Метрологические и функциональные характеристики измерительных средств. Измерения при монтаже и эксплуатации волоконно-оптических линий.
Измерительная и проверочная аппаратура
Контрольная работа Дисциплина: Метрология в телекоммуникационных системах Тема: «Измерительная и проверочная аппаратура» Измерительная и проверочная аппаратура
Универсальный календарь
Введение 1 Основная теория изменения григорианского календаря 2 Недостатки григорианского календаря 3 Проекты, нарушающие непрерывность счета дней семидневной недели
Характеристика и работа с архиватором WinZip
Инсталляция программы, ее преимущества, сравнительная характеристика. Работа в программе, настройки, графическое меню, интерфейс, удобство управления, функциональность. Просмотр отдельных файлов в архиве, архивирование. Архивы, поддерживаемые WinZip.
Мультимедиа в Windows 95
ордовский государственный университет имени Н.П. Огарева юридический факультет кафедра информатики РЕФЕРАТ Мультимедиа в Windows'95. Программы Универсальный проигрыватель. Лазерный проигрыватель. Фонограф.
DVD дисководы
В самом начале аббревиатура DVD обозначала Digital Video Disk – цифровой видеодиск нового поколения. Однако позднее консорциум DVD отказался от этой расшифровки. Произошло это потому, что стало ясно: на свет родилась не просто новая модель Video CD, а универсальный носитель информации – как видео и аудио, так и компьютерных данных.
Триггеры
Триггеры -это устройства предназначенные для хранения одного разряда информации. Триггеры имеют два устойчивых состояния.
Создание презентации по мотоциклам "Движение вперед"
История разработки, назначение и функциональные возможности программы Microsoft Office PowerPoint. Алгоритм создания презентации: выбор фона и контрастности слайдов, вставка объекта, выбор макета содержимого, создание анимации и настройка времени показа.
Просмотрщики Интернет
Программа-просмотрщик Internet Explorer как расширение программы Проводник, ориентированное на работу не только с файловой системой данного компьютера, но и с Web-документами Интернета. Особенности программы-приложения просмотрщика картинок PixGrabber.
АТФ и ее роль в клетке
В цитоплазме каждой клетки, а также в митохондриях, хлоро-пластах и ядрах содержится аденозинтрифосфорная кислота (АТФ). Она поставляет энергию для большинства реакций, происходящих в клетке.
Углеводы
Углеводы – как название уже говорит само за себя, состоит из углерода и воды. У них так же, как и у аминокислот, есть стереоизомеры, (L и D – молекулы), принцип определения такой же, как и в аминокислотах.
Живая система
Живая система в условиях Земли - это открытая система состоящая из органических в-в и их компонентов, основными из которых являются белки и нукл. кислоты, обладающая единым метоболизмом, который обеспечивает её саморегуляцию и самовоспроизведение.
Алан Лилльский
Алан Лилльский (Alain de Lille, Alanus de Insulis) (ок. 1120/1130—1202/1203) — фр. теолог, философ и поэт; «универсальный доктор» (doctor universalis).
Альберт Великий
Альберт Великий или Альберт фон Больштедт (Albertus Magnus, Albert der Gro Be?, Albert von Bollstadt) (1193 или 1206/1207—1280) — нем. теолог, философ, естествоиспытатель; «универсальный доктор» (doctor universalis).
Гроув Эндрю
Гроув Эндрю (Grove S. Andrew) (р. 1936, Будапешт), американский ученый и предприниматель (венгерского происхождения), председатель и главный исполнительный директор корпорации Intel - мирового лидера в области микропроцессорных технологий.
Айвс, Фредерик Юджин
Айвс, Фредерик Юджин (Ives, Frederic Eugene) (1856–1937), американский изобретатель.