Банк рефератов содержит более 364 тысяч рефератов, курсовых и дипломных работ, шпаргалок и докладов по различным дисциплинам: истории, психологии, экономике, менеджменту, философии, праву, экологии. А также изложения, сочинения по литературе, отчеты по практике, топики по английскому.
Полнотекстовый поиск
Всего работ:
364150
Теги названий
Разделы
Авиация и космонавтика (304)
Административное право (123)
Арбитражный процесс (23)
Архитектура (113)
Астрология (4)
Астрономия (4814)
Банковское дело (5227)
Безопасность жизнедеятельности (2616)
Биографии (3423)
Биология (4214)
Биология и химия (1518)
Биржевое дело (68)
Ботаника и сельское хоз-во (2836)
Бухгалтерский учет и аудит (8269)
Валютные отношения (50)
Ветеринария (50)
Военная кафедра (762)
ГДЗ (2)
География (5275)
Геодезия (30)
Геология (1222)
Геополитика (43)
Государство и право (20403)
Гражданское право и процесс (465)
Делопроизводство (19)
Деньги и кредит (108)
ЕГЭ (173)
Естествознание (96)
Журналистика (899)
ЗНО (54)
Зоология (34)
Издательское дело и полиграфия (476)
Инвестиции (106)
Иностранный язык (62792)
Информатика (3562)
Информатика, программирование (6444)
Исторические личности (2165)
История (21320)
История техники (766)
Кибернетика (64)
Коммуникации и связь (3145)
Компьютерные науки (60)
Косметология (17)
Краеведение и этнография (588)
Краткое содержание произведений (1000)
Криминалистика (106)
Криминология (48)
Криптология (3)
Кулинария (1167)
Культура и искусство (8485)
Культурология (537)
Литература : зарубежная (2044)
Литература и русский язык (11657)
Логика (532)
Логистика (21)
Маркетинг (7985)
Математика (3721)
Медицина, здоровье (10549)
Медицинские науки (88)
Международное публичное право (58)
Международное частное право (36)
Международные отношения (2257)
Менеджмент (12491)
Металлургия (91)
Москвоведение (797)
Музыка (1338)
Муниципальное право (24)
Налоги, налогообложение (214)
Наука и техника (1141)
Начертательная геометрия (3)
Оккультизм и уфология (8)
Остальные рефераты (21697)
Педагогика (7850)
Политология (3801)
Право (682)
Право, юриспруденция (2881)
Предпринимательство (475)
Прикладные науки (1)
Промышленность, производство (7100)
Психология (8694)
психология, педагогика (4121)
Радиоэлектроника (443)
Реклама (952)
Религия и мифология (2967)
Риторика (23)
Сексология (748)
Социология (4876)
Статистика (95)
Страхование (107)
Строительные науки (7)
Строительство (2004)
Схемотехника (15)
Таможенная система (663)
Теория государства и права (240)
Теория организации (39)
Теплотехника (25)
Технология (624)
Товароведение (16)
Транспорт (2652)
Трудовое право (136)
Туризм (90)
Уголовное право и процесс (406)
Управление (95)
Управленческие науки (24)
Физика (3463)
Физкультура и спорт (4482)
Философия (7216)
Финансовые науки (4592)
Финансы (5386)
Фотография (3)
Химия (2244)
Хозяйственное право (23)
Цифровые устройства (29)
Экологическое право (35)
Экология (4517)
Экономика (20645)
Экономико-математическое моделирование (666)
Экономическая география (119)
Экономическая теория (2573)
Этика (889)
Юриспруденция (288)
Языковедение (148)
Языкознание, филология (1140)

Статья: Проигрыватель музыкальных дисков

Название: Проигрыватель музыкальных дисков
Раздел: Рефераты по информатике, программированию
Тип: статья Добавлен 08:54:13 05 мая 2007 Похожие работы
Просмотров: 81 Комментариев: 2 Оценило: 0 человек Средний балл: 0 Оценка: неизвестно     Скачать

Владимир Коробицын

Вставка этикеток. Извлечение текущей даты из компьютера. Управление приложением с клавиатуры. Многооконность приложения.

Если Вы хотите изготовить приложение собственного проигрывателя музыкальных компакт-дисков, то Ваш компьютер должен быть оснащен устройством чтения оптических CD-дисков и музыкальной картой. Если музыкальная карта отсутствует, то прослушивать записи придется посредством головных телефонов.

Создайте папку Lesson31. Поместите в нее файл поддержки мультимедийных объектов Mci.vbx. Запустите Visual Basic. Окно формы Form1 окрасьте, например, в темно-серый цвет. Добавьте в проект Вашего приложения файл Mci.vbx. Для этого в меню File (Файл) выберите команду Add File ... (Добавить файл …) и через появившееся окно загрузите файл поддержки Mci.vbx. В окне объектов появится значок мультимедийных объектов. Щелкните по кнопке с этим значком и поместите объект MMControl1 на форму Вашего приложения. В окне свойств объекта MMControl1 для свойств BackVisible, StepVisible, RecordVisible установите значение False (Ложь), так как эти кнопки в проигрывателе использоваться не будут. В процедуру Form_Load, которая вызывается сразу после загрузки приложения, впишите программный код:

Sub Form_Load ( )

MMControl1.DeviceType = "CDAudio"

MMControl1.Command = "Open"

MMControl1.Command = "Play"

End Sub

Первая строка программного кода активизирует устройство чтения компакт-дисков, следующая строка открывает первую музыкальную запись, и последняя строка заставляет воспроизводить мелодии с диска по порядку.

В устройство для CD-дисков поместите музыкальный компакт-диск. Запустите приложение. Проигрыватель начнет воспроизводить первую запись на компакт-диске. Если этого не произойдет, вызовите в Windows стандартную панель управления звуком Volume Control и меню «Параметры» выберите команду «Свойства», где включите CD Audio. Теперь должен появиться звук, в противном случае проверьте правильность написания программного кода.

Во время работы приложения изучите назначение каждой клавиши вновь созданного проигрывателя. Для этого поочередно щелкайте мышкой по клавишам проигрывателя.

В окно приложения можете поместить, выбранный на Ваше усмотрение рисунок.

В окне Properties (Свойства) для формы Form1 выберите свойство Caption (Надпись) и измените его значение на «Проигрыватель музыкальных компакт-дисков». Для полного останова проигрывателя и выхода из приложения создайте командную кнопку Command1. В процедуру прерывания Command1_Click запишите программный код:

Sub Command1_Click ( )

MMControl1.Command = "Stop"

MMControl1.Command = "Close"

End

End Sub

Первая строка останавливает воспроизведение любой записи компакт-диска, следующая строка закрывает файл мелодии для объекта MMControl1, и последняя строка полностью завершает работу приложения. Надпись на командной кнопке измените на надпись «Выход». Если Вы хотите, чтобы мелодии продолжали звучать после завершения работы приложения, смонтируйте еще одну командную кнопку Command2 и для нее в процедуру прерывания Command2_Click впишите только последнюю строку из процедуры Command1_Click, опустив две первые строки. Если через некоторое время все-таки возникнет необходимость в останове воспроизведения музыкального диска, то это можно сделать вручную, нажав на кнопку «Выезд диска» устройства для воспроизведения оптических дисков.

Для объекта MMControl1 самостоятельно изучите свойство Orientation (Расположение), которое может принимать два значения: 0-Horizontal (Горизонтальное) и 1-Vertical (Вертикальное).

А теперь рассмотрим операцию размещения этикеток в приложении. На панели объектов щелкните по значку «Этикетка» и поместите объект Label1 (Этикетка первая) на форму приложения. В окне Properties (Свойства) для этого объекта измените значение свойства Caption (Заголовок) на произвольную надпись, например, «Мир мелодий, также неисчерпаем, как и сама вселенная». Самостоятельно поэкспериментируйте со свойствами этикетки. Обязательно посмотрите, как работает свойство этикетки BackStyle (Стиль фона). Затем создайте вторую этикетку – Label2. Ее свойству Caption придайте значение сегодняшней даты. Для этого в процедуру Form_Load допишите строку:

Label2.Caption = Date ' показать дату

Теперь запустив приложение, Вы обнаружите в его окне сегодняшнюю дату.

Если Вы не любите «мышиную возню», то попробуйте управлять данным приложением только с клавиатуры. Visual Basic автоматически назначает наиболее употребительные клавиши управления приложениями для Windows. Это клавиши – «Enter», «Курсоры», «Пробел», «Tab», «Esc» и другие. Отодвиньте мышь на дальний край Вашего рабочего стола, с клавиатуры запустите приложение и поработайте в нем. Затем, по-прежнему не прибегая к помощи мыши, закройте приложение. В уроке № 4 Вы узнаете, как можно назначить любую клавишу для реакции приложения на действия пользователя.

А теперь вкратце остановимся на возможности построения многооконных приложений. В только что созданное приложение добавьте второе окно, где расположите сведения об авторстве на это приложение. Из папки Lesson31 запустите проект приложения Project1.mak. В области панели инструментов щелкните по значку «Открытие новой формы» или в меню File (Файл) выберите New Form (Новая форма). Ваше приложение дополнится еще одной формой Form2. Уменьшите размеры новой формы в расчете на то, чтобы на ней поместились минимальные сведения об авторе. Переместите ее в нужную для Вас область экрана. Окрасьте окно этой формы в произвольный цвет, например, серый. Для вызова второго окна установите на форме Form1 первого окна кнопку Command3. Ее свойству Caption (Надпись) придайте значение «О программе» и в процедуру прерывания Command3_Click впишите программное утверждение:

Form2.Show ‘ показать вторую форму

Эта строка, при нажатии на кнопку «О программе» в поле первого окна, покажет второе окно в определенном месте экрана. Для формы Form2 свойству Caption (Надпись) придайте значение «О программе», свойству BorderStyle (Граничный стиль) придайте значение 3-Fixed Double. Во втором окне расположите небольших размеров рисунок или пиктограмму (расширение ICO). Если у Вас окажется под рукой сканер, поместите во второе окно свою фотографию. Поместите в это окно сведения о названии программы, о дате ее создания, Ваше имя, телефон и другое. Для этой цели несколько раз используйте объект Label (Этикетка).

Во избежании путаницы при создании многооконного приложения необходимо указывать перед именем объекта имя формы, которой принадлежит тот или иной объект. Например, строка из программного кода приложения «Проигрыватель музыкальных компакт-дисков» теперь будет выглядеть так:

Form1.Label2.Caption = Date ‘ показать дату

А для второй этикетки второй формы можно записать, например:

Form2.Label2.Caption = “Омск 2000 Россия”

Если Вы хотите скрыть вторую форму Form2 на каком-либо этапе работы Вашего приложения, то в нужную процедуру прерывания включите строку:

Form2.Hide ‘ скрыть вторую форму

Можно данное программное утверждение поместить, например, в процедуру прерывания второй формы Form_Deactivate. Эта процедура сработает при свершении такого события, как наступление пассивного состояния второго окна.

Для загрузки формы в память существует оператор Load (Загрузить). Например, для второй формы он применяется так:

Load Form2 ‘ загрузка второй формы в память

Чтобы выгрузить форму, используйте оператор Unload. Для удаления второй формы из памяти необходимо программное утверждение:

Unload Form2 ‘ выгрузка второй формы из памяти

Если применена команда Show (Показать) до выполнения команды Load (Загрузить), то команда Show автоматически загрузит форму, а затем покажет ее. И все-таки часто возникает необходимость в использовании оператора Load, например, для предварительной загрузки формы, содержащей большое число объектов. Тогда неприятное притормаживание будет скрыто от взора пользователя. Иногда во время работы приложения полезно выгружать из памяти формы, которые не отображены на экране в данное время. Тем самым Вы справитесь с перегрузкой памяти.

Домашнее задание

1. В одно из приложений первого или второго уроков добавьте два новых окна. Первое из этих окон должно содержать сведения о текущих дате и времени, а второе превратите в проигрыватель музыкальных компакт-дисков.

2. Самостоятельно изучите объект Line (Линия) и его свойства. Подумайте, как применить этот объект в ранее созданных Вами приложениях.

3. Самостоятельно исследуйте объект типа Frame (Фрейм) и его свойства. Используйте этот объект для оформления Ваших программ.

И еще. Непременно исследуйте все имеющиеся у Вас оптические диски (даже с игровыми программами) путем запуска их из созданного Вами проигрывателя. Иногда совершенно неожиданно начинают звучать мелодии из программ, в которых они должны воспроизводиться только во время работы этих программ.

Оценить/Добавить комментарий
Имя
Оценка
Комментарии:
Где скачать еще рефератов? Здесь: letsdoit777.blogspot.com
Евгений22:18:00 18 марта 2016
Кто еще хочет зарабатывать от 9000 рублей в день "Чистых Денег"? Узнайте как: business1777.blogspot.com ! Cпециально для студентов!
15:42:12 24 ноября 2015

Работы, похожие на Статья: Проигрыватель музыкальных дисков

Назад
Меню
Главная
Рефераты
Благодарности
Опрос
Станете ли вы заказывать работу за деньги, если не найдете ее в Интернете?

Да, в любом случае.
Да, но только в случае крайней необходимости.
Возможно, в зависимости от цены.
Нет, напишу его сам.
Нет, забью.



Результаты(150051)
Комментарии (1830)
Copyright © 2005-2016 BestReferat.ru bestreferat@mail.ru       реклама на сайте

Рейтинг@Mail.ru