Объектно-ориентированное программирование аудиоредактор

Факультет: Информационных технологий и рекламы Кафедра: Информатики Специальность: 230102 Использование возможностей Delphi для разработки редактора звуковых файлов. выполнил (Ф.И.О. полностью, подпись) принял (должность, уч. степень

Ф.И.О подпись) Работа защищена с оценкой Анапа 2006 СОДЕРЖАНИЕ ВВЕДЕНИЕ стр. 3 Изучение предметной области стр. 4 Выбор средств разработки стр. 6 Описание функций и модулей стр. 7 Руководство пользователя стр. 10 Требования к аппаратным и программным частям стр. 12 ЗАКЛЮЧЕНИЕ стр. 13 СПИСОК ИСПОЛЬЗУЕМОЙ ЛИТЕРАТУРЫ стр.

14 ЛИСТИНГ ПРОГРАММЫ стр. 15 ВВЕДЕНИЕ Мультимедиа — это интерактивные системы, обеспечивающие ра¬боту с непод¬вижными изображениями и движущимся видео, анимированной компьютерной графикой и высококачественным звуком. Применение возможностей мультимедиа, производит революционные изменения в таких областях, как образование, культура, компьютерный тренинг, во многих сферах профессиональной деятельности, науки, искусства, кинематографа, в компьютерных играх и т.д.

В данной работе речь пойдёт о записи, хранении, воспроизведении и редактировании цифрового звука (wave form audio), являющегося неотъемлемой частью любого направления мультимедиа технологий. ЦИФРОВОЕ ПРЕДСТАВЛЕНИЕ ЗВУКА Звук в природе представляет собой волновые колебания воздуха или другой среды, в которой он распространяется. При записи и хранении звука аналоговая аудиоаппаратура применяет представление звука через напряжение электрического сигнала.

Такое же представление имеет и компьютерная аудио периферия (колонки, наушники, микрофон). U t Оцифрованный звук может быть представлен самыми различными способами. В числе наиболее широко применяемого способа цифрового представления звука можно отметить формат PCM - pulse code modulation - импульсно-кодовая модуляция. В контексте нашей тематики под этим термином подразумевается такой способ кодирования данных, при котором

каждая выборка (отсчет), произведенная аналого-цифровым преобразователем звуковой карты или другого аудио устройства, представляется в памяти в виде числа, пропорционального по своему значению мгновенной величине сигнала в момент выборки, как показано на рисунке. Скорость выборок или, другими словами, частота выполнения отсчетов (частота дискретизации), прямо связана с максимальной частотой поступающего аналогового сигнала.

Если сигнал имеет гармоническую природу и ограничен в некотором диапазоне частот, то для его корректной оцифровки, согласно теореме отсчетов, достаточно иметь частоту дискретизации вдвое превосходящей частоту максимальной гармоники сигнала. Таким образом, если необходимо без потери качества производить цифровую запись скажем, телефонного разговора, частота сигнала которого находится в диапазоне 300 3400 Гц, то вполне достаточно установить частоту дискретизации 8000 отсчетов/сек.

Величина 8000 выбрана из соображений совместимости с различными звуковыми картами и драйверами, поскольку для некоторых из них это является наименьшим возможным значением частоты дискретизации сигнала. Если же необходимо записывать радиопередачи в диапазоне FM (88 - 108 MHz), то понадобится выбрать частоту дискретизации 12500*2=25000 отсчетов/сек, т.к. звуковой диапазон FM-станции 12.5 килогерц. Запись с компакт-диска для сохранения качества нужно производить

с частотой дискретизации 44100 выборок/секунду. Замечу, что это вовсе не гарантирует идеальное качество звучание записи. Звуковая карта вносит некоторые искажения в любом случае. Кроме частоты дискретизации, цифровой звук имеет ещё один немаловажный параметр – глубина модуляции. Она определяет максимальное количество возможных значений уровня сигнала и, как следствие количество бит информации, необходимых для хранения одной выборки.

ВЫБОР СРЕДСТВ РАЗРАБОТКИ В данной работе для реализации поставленной задачи использована визуальная среда программирования Borland Delphi 7 использующая язык Object Pascal. Надо отметить, что к моменту выхода продукта обстановка вокруг компании Borland складывалась не лучшим для нее образом. Поговаривали о возможной перепродаже компании, курс акций компании неудержимо катился вниз. Сейчас уже можно без всяких сомнений утверждать, что период

трудностей позади. Неверно, конечно, было бы говорить, что только Delphi явился причиной восстановления компании; кроме Delphi, у Borland появились и другие замечательные продукты, так же, как и Delphi, основывающиеся на новых, появившихся недавно у компании Borland, технологиях. На пример новые BDE 2.0, BC++ 4.5,

Paradox for Windows 5.0, dBase for Windows 5.0, BC++ 2.0 for OS/2. Тем не менее, именно Delphi стал тем продуктом, на примере которого стало ясно, что у Borland есть еще порох в пороховницах, и что один единственный продукт может настолько удачно сочетать несколько передовых технологий. Delphi. Основные характеристики продукта. Delphi - это комбинация нескольких важнейших технологий: •

Высокопроизводительный компилятор в машинный код • Объектно-ориентированная модель компонент • Визуальное (а, следовательно, и скоростное) построение приложений из программных прототипов ОПИСАНИЕ ФУНКЦИЙ И МОДУЛЕЙ Модуль func.pas содержит процедуры обеспечивающие хранение списка последних открытых файлов procedure RegisterFile(filename:string); Добавление пути в список открытых файлов procedure

UpdLastFilesList; обновление списка открытых файлов в главном меню программы function CorPath(Path:String):string; Сокращение пути к файлу для большей информативности Вот пример хранения списка в файле: [lastFiles] N1=C:Documents and SettingsmainDesktopOOPKoursMoonlight.wav ind=5 N2=C:Documents and SettingsmainDesktopOOPKoursNot with you.wav

N3=C:Documents and SettingsmainDesktopOOPKourssin.wav N4=C:Documents and SettingsmainDesktopOOPKoursAlizee.wav N5=C:Documents and SettingsmainDesktopOOPKoursAqua.wav N6=C:Documents and SettingsmainDesktopOOPKoursля.WAV Модули vol.pas и selectDev.pas используются формами

Получение списка доступных аудиоустройств и их свойств: procedure TForm2.FormShow(Sender: TObject); var caps: TWaveOutCapsA; i,DevCount:integer; begin ListBox1.Clear; DevCount:=waveOutGetNumDevs; for i:=0 to devcount-1 do begin waveOutGetDevCaps(i, @caps,SizeOf(TWAVEOUTCAPSA)); ListBox1.Items.Add(caps.szPname); end; waveOutGetDevCaps(WAVE_MAPPER, @caps,

SizeOf(TWAVEOUTCAPSA)); ListBox1.Items.Add(caps.szPname); end; Модуль unit1.pas: Procedure SaveWFile(FileName:String); Сохранение данных из объекта TMemoryStream в файл Procedure OpenWFile(FileName:String); Загрузка данных из файла посредствам объекта TFileStream в память (TMemoryStream) c проверкой формата и получением данных о звуке (глубина, частота

дискретизации, количество каналов), после чего инициализация устройства вывода, подготовка буферов и воспроизведение звука. procedure waveoutProc(hwi: HWAVEOUT; uMsg, dwInstance, dwParam1, dwParam2: DWORD); stdcall; Стандартная callback-функция вызываемая драйвером аудио из вне при завершении проигрывания очередного буфера. При её вызове происходит считывание очередной порции данных и передача их драйверу. procedure DrawOscio; Прорисовка осциллограммы текущего аудио фрагмента на поверхности объека

TPaintBox. procedure BuildPeaks; Подготовка данных для вывода примерной диаграммы всего файла. procedure TForm1.TrackBar4Change(Sender: TObject); Событие, вызываемое при перемещении ползунка на линии времени, выполняется изменение текущей позиции в аудио потоке и обновление осциолограммы. РУКОВОДСТВО ПОЛЬЗОВАТЕЛЯ Основные органы управления приложением показаны на рисунке: Список последних недавно открытых файлов, хранится в конфигурационном файле программы

ТРЕБОВАНИЯ К ПРОГРАММНЫМ И АППАРАТНЫМ ЧАСТЯМ. Разрабатываемое приложение обеспечивает стабильную работоспособность на следующем аппаратно-программном обеспечении: 1. IBM совместимый персональный компьютер в типовой конфигурации. 2. Стандартная мышь. 3. Не менее 2Mb свободного места на жестком диске. 4. Предустановленная операционная система MS Windows версии не ниже 95 или

NT. 5. WAVE- совместимое аудиоустройство. ЗАКЛЮЧЕНИЕ В данной курсовой проделана работа по созданию приложения для редактирования и проигрывания цифрового звука в среде Delphi. Были изучены основные принципы работы с подсистемой аудио windows, от изучения формата wave файлов до полноценного приложения редактирующего и проигрывающего аудио файлы. Приложение имеет все необходимые средства для комфортного отображения аудио данных в графическом виде.

Плюсами являются: Windows подобный интерфейс, двух канальный звук, простота в использовании, информация об аудио данных. Минусами можно назвать: не возможность записи аудио и поддержка только одного формата wave. Также проделана работа по оформлению интерфейса приложения, работа с графическим представлением данных. СПИСОК ИСПОЛЬЗУЕМОЙ ЛИТЕРАТУРЫ 1. Иллюстрированный самоучитель по Delphi 7 для начинающих (электронная версия учебника).

2. Delphi 7 на примерах. Авторы: Пестриков В. Маслобоев А. Москва 2005г. 3. Borland Delphi 7 (электронная версия учебника). 4. Delphi 7. Учебный курс. Автор: Бобровский С.И. 5. Справочная система Microsoft Programming reference, файл MMEDIA, раздел Waveform audio. 6. Delphi и Windows

API – Анатолий Тенцер 7. Библия программиста в среде Delphi – Михаил Фленов 8. Программирование в Delphi 7 – П. Дарахвелидзе, Е. Маркова 9. Система управления архивом статей Delphi World версия 6.0 – Н. Акулов ЛИСТИНГ ПРОГРАММНЫХ МОДУЛЕЙ Главный модуль