Если вы создаете какую-либо программу в Visual Basic и хотите включить музыку в программе то вам придется вставить плейер с кнопками включения/отключения.
Для вставки музыки и видео в Visual Basic 6.0 используется интерфейс MCI, обеспечивающим доступ к функциям Windows, управляющим устройствами мультимедиа. Основным элементом этого интерфейса является элемент управления MMControl с набором свойств, позволяющих разрабатывать и управлять мультимедиа в VB.
На рисунке ниже показан элемент управления MCI MMControl,использующий все ресурсы в мультимедии VB.Чтобы включить его выберите в редакторе VB меню Проект , далее включите Компоненты и в открывшемся окне в списке найдите Microsoft Multimedia Control 6.0. Поставьте галочку в окошке этого элемента и нажмите ОК. MMControl появится в панели элементов управления.Чтобы добавить его на форму, дважды щелкните по нему и разместите в нужное место,или щелкните по нему один раз переместите курсор на форму и нажав левую кнопку крестиком установите размеры
Свойства элементов управления MMControl
Свойство |
Описание |
| AutoEnable | Автоматическая доступность кнопок при готовности устройства к работе |
| BackEnabled | Доступность кнопки Back (Шаг назад) |
| EjectEnabled | Доступность кнопки Eject (Извлечь) |
| NextEnabled | Доступность кнопки Next (Следующая) |
| PauseEnabled | Доступность кнопки Pause (Пауза) |
| PlayEnabled | Доступность кнопки Play (Воспроизведение) |
| PrevEnabled | Доступность кнопки Prev (Предыдущая) |
| RecordEnabled | Доступность кнопки Record (Запись) |
| StepEnabled | Доступность кнопки Step (Шаг вперед) |
| StopEnabled | Доступность кнопки Stop (Стоп) |
| BackVisible | Видимость кнопки Back (Шаг назад) |
| EjectVisible | Видимость кнопки Eject (Извлечь) |
| NextVisible | Видимость кнопки Next (Следующая) |
| PauseVisible | Видимость кнопки Pause (Пауза) |
| PlayVisible | Видимость кнопки Play (Воспроизведение) |
| PrevVisible | Видимость кнопки Prev (Предыдущая) |
| RecordVisible | Видимость кнопки Record (Запись) |
| StepVisible | Видимость кнопки Step (Шаг вперед) |
| StopVisible | Видимость кнопки Stop (Стоп) |
| CanEject | Если носитель можно извлечь из устройства возвращает True, если нет то False |
| CanPlay | Если устройство готово к воспроизведению возвращает True,если нет то False |
| CanRecord | Если устройство готово к записи данных возвращает True, если нет то False |
| CanStep | Если на устройстве возможно покадровое воспроизведение возвращает True,если нет то False |
| Command | Текущая команда для устройства |
| DeviceID | Устанавливка идентификатор |
| DeviceType | Устанавливка типа устройства (табл. 12.2) |
| Error | Возвращает последнюю ошибку MCI |
| ErrorMessage | Возвращает сообщение о последней ошибке |
| FileName | Устанавливка файла для воспроизведения при файловой структуре носителя |
| Frames | Определяет число пропускаемых командой Step шагов |
| hWndDisplay | Назначает дескриптор окна вывода |
| Length | Возвращает длину источника данных |
| Mode | Возвращает текущий режим работы устройства |
| Notify | Работа службы сообщений; если True — служба работает, если False — служба не работает |
| NotifyMessage | Задает сообщение, если включена служба сообщений |
| NotifyValue | Указывает результат последней команды MCI |
| Orientation | Положение MMControl. Если 0 — горизонтально, если 1 — вертикальнао |
| Position | Текущаю позиция на устройстве в соответствии со свойством TimeFormat |
| RecordMode | Установка текущего режима записи устройства, привозможности вести запись |
| Shareable | Доступ других программ к MCI |
| Silent | Отключение звука |
| Start | Установка начальной позиции на носителе |
| TimeFormat | Устанавливает формат времени |
| To | Установка конечной позиции на носителе |
| Track | Устанавливает номер отдельного трека, зависящего от свойств TrackLength и TrackPosition. |
| TrackLength | Возвращает размер трека, номер которого установлен в свойстве Track |
| TrackPosition | Возвращает позицию на треке, номер которого установлен в свойстве Track |
| Tracks | Возвращает количество треков |
| Updatelnterval | Установка интервала выдачи события StatusUpdate |
Свойства доступности кнопок(содержат в имени Enabled)
При помощи свойств видимости (visible) можно спрятать ненужные кнопки. Если установить свойство видимости какой-либо из кнопок в значение
False,
то эта кнопка не будет отображаться
на панели кнопок ни в режиме проектирования, ни в режиме выполнения приложения.
Если для свойства AutoEnable установлено значение
True,
то для всех режимов автоматически включается доступность набора кнопок, соответствующего выбранному режиму.К примеры, при воспроизведении будет автоматически установлена доступность кнопки Stop а Play недоступен
Значения свойства DeviceType в соответствии с устройствами мультимедиа
Тип устройства |
|
| Файлы в формате AVI | AVIVideo |
| Музыкальный компакт-диск | CDAudio |
| Цифровая магнитная запись | DAT |
| Цифровое видео | DigitalVideo |
| Прочие устройства | Other |
| Покадровое видеоизображение | Overlay |
| Сканер | Scanner |
| Секвенсор | Sequenser |
| Видеомагнитофон | VCR |
| Проигрыватель видеодисков | VideoDisk |
| Файл в формате WAV | WaveAudio |
Настройка элемента управления MMControl
Что бы вызвать диалоговое окно включите меню View (Вид), в списке выберите Property Pages(Страница параметров),затем вкладка Controls .Для доступности и видимости каждой кнопки установите флажки рядом с изображением кнопки.
| Команда | Назначение |
| Open | Открывает файл (устройство) для работы |
| Close | Закрывает файл (устройство) |
| Prev | Переходит в начало предыдущего трека. Если это первый трек или файл, то переход осуществляется в начало этого трека, файла |
| Next | Переходит в начало следующего трека. Если это последний трек или файл, то переход осуществляется в начало этого трека, файла |
| Step | Переходит на шаг (кадр) вперед по треку (файлу) |
| Back | Переходит на шаг (кадр) назад по треку (файлу) |
| Pause | Приостанавливает работу устройства |
| Play | Воспроизводит информацию с устройства |
| Record | Записывает информацию |
| Stop | Останавливает работу устройства |
| Eject | Извлекает носитель из устройства (компакт-диск из привода) |
| Save | Сохраняет открытый файл |
| Seek | Находит позицию (трек) в файле или на устройстве |
| Посмотрите пример использования MMControl на примере создания проигрывателя формата Wav. |
Для сайта
Анимация на сайте.gif){kind=small}
Программирование
