МІНІСТЕРСТВО ОСВІТИ І НАУКИ УКРАЇНИ
ОДЕСЬКА ДЕРЖАВНА АКАДЕМІЯ ХОЛОДУ
МЕТОДИЧНІ ВКАЗІВКИ
для лабораторного практикуму з курсу
„Мультимедійне програмування”
Методічні вказівки та контрольні завдання
(5 курс, 9 семестр)
Одеса – 2009
Розроблено Кафедрою інформаційних технологій відповідно до освітньо-професійної програми та структурно-логічної схеми підготовки спеціалістів напряму підготовки 0804 - Комп’ютерні науки
Розробник: ст..викл. Д. М. Попков, ас.Асланов О.М.
Робоча програма затверджена на засіданні кафедри IТ
“___” _________________ 2009 р. Протокол № ___
Завідувач кафедри IТ
д.т.н., професор В. М. Плотніков
Схвалено методичною комісією напряму підготовки
Комп’ютерні науки Науково-методичної ради ФІТ
“____” _______________ 2009 р. Протокол № ___
Голова методичної комісії
к.т.н., доцент Ю.К. Корнієнко
Зміст
Вступ……………………………………………………………………………………4
Лабораторна робота №1.Робота з activex-компонентами…………..5
Лабораторна робота №2. Створення лазерного програвача……...10
Лабораторна робота №3. Створення відео програвача………...…20
Лабораторна робота №4. Розробка синтезатора звуків………...…23
Лабораторна робота №5. Створення універсального конвертора графічних файлів………………………………………….……….…41
Лабораторна робота №6. Створення додатку «фоторобот»……….48
Лабораторна робота №7. Робота з системним часом комп'ютера 62
Лабораторна робота №8. Імітація руху планет навколо сонця……68
Список використаної літератури…………………………………...………74
Вступ
Методичні вказівки написані для студентів, що виконують лабораторний практикум по курсу мультимедійного програмування. Метою практикуму є придбання практичних навиків в створенні мультимедійних застосувань, побудова конкретних алгоритмів і систем, практичне вивчення, аналіз і застосування мультимедіа функцій на практиці, особливості написання такого роду застосувань.
Кожна лабораторна робота складається із завдання по розробці базових алгоритмів, написання блок-схеми і доопрацювання коди програми. Допомогу містить список робіт, а також приклади програмної коди для створення аудіо і відео плеєрів, синтезаторів, конвертера графічних файлів, а також робота з WINAPI функціями ОС Windows. Всі приведені приклади виконані з використанням об'єктно-орієнтованої мови програмування Pascal і реалізовані у візуальному середовищі Borland Delphi.
В курсі ММП передбачене виконання розрахунково-графічного завдання. Матеріали для РГЗ складені так, щоб студенти могли обрати доступний для виконання варіант.
Лабораторна робота №1
РОБОТА З ACTIVEX-КОМПОНЕНТАМИ
Простий медіа-програвач можна створити стандартними засобами Windows. Існують модулі, які доступні з будь-якої мови програмування, - це ACTIVEX. Delphi в цьому плані не виключення. Вбудований в систему Windows Media Player має власний ActiveX-модуль, який можна використовувати для написання програми. Спершу ActiveX-компонент потрібно інтегрувати в оболонку Delphi. Робиться це так: відкриваємо діалогове вікно Component - Import ACTIVEX Control.
У різних версіях Delphi цей пункт меню може називатися по-різному, але ключовим залишається слово ACTIVEX. У вікні, що відкрилося, в списку компонент необхідно знайти рядок Windows Media Player. Далі натиснути Install. У вікні, що з'явилося, можна вказати, в який пакет слід встановити компонент. Можна залишити все за умовчанням і натиснути ОК. Після цього на вкладці ACTIVEX палітри компонент з'явиться кнопка WindowsMediaPlayer. Тепер можна приступити до створення програвача.
Для початку потрібного встановити компонент на форму - клацнувши по його значку і потім формою. З'явиться зображення програвача. Його зовнішній вигляд залежить від версії встановленого в системі компоненту. Зразковий вигляд зображений на малюнку 1.
Рис.1
Необхідного реалізувати можливість відкривати/обирати потрібний файл. За шлях до файлу, який потрібно відтворювати, відповідає властивість URL типу Wide String (рядок). Далі розміщуємо на формі компонент TMainMenu (сторінка Standard). Двічі клацнувши по значку TMainMenu, що знаходиться на формі відкриється дизайнер меню. Виділяємо єдиний пункт в заголовку меню і в його властивості Caption необхідно записати "&Файл". Потім необхідно клацнути по створеному пункту і знизу з'явиться ще один порожній рядок. Там відображена назва пункту - "Відкрити". Наступним рядком створюється роздільник для меню. У властивості Caption поставити символ мінус ("-"). Наступним рядком буде пункт "Вихід".
Тепер потрібно пов'язати пункт меню з діалогом відкриття файлу. Необхідно знайти компонент TOpenDialog на сторінці Dialogs і помістити його на форму. Тепер активуємо властивість Filter і натиснемо на кнопку з трьома крапками ("..."). У вікні, що з'явилося, треба ввести необхідні типи файлів. У полі Filter Name потрібно ввести опис типів файлів, а в поле Filter - сам фільтр. Приклад на малюнку 2.
Рис.2
Щоб з компонентом було зручно працювати, змініть його властивість Name на MediaPlayer.
Виділіть компонент і перейдіть у вікно Object Inspector. Властивостей (Properties) у компонента не дуже багато, а подій (Events) значно більше. Для зручності, компонент MainMenu1 перейменуємо в MainMenu, а OpenDialog1 - в OpenDialog.
Перш ніж запрограмувати пункт меню "Відкрити" необхідно відкрити дизайнер меню і двічі клацнути по потрібному пункту - відкриється редактор коди. У цьому місці слід написати:
if OpenDialog.Execute then
MediaPlayer.URL:=OpenDialog.FileName;
Метод Execute відкриває діалог і, якщо користувач не натиснув "Відміна", то функція повертає значення True, а в FileName записується шлях до вибраного файлу. Потім властивості URL програвача привласнюється вибраний файл. На цьому етапі запустимо програму, шляхом натиснення на кнопку F9 або Run, і спробуємо відкрити файл.
Тепер необхідно вікно програвача привести до нормального вигляду. Сам програвач потрібно розтягнути на всю ширину вікна - змініть його властивість Align на alClient. Саму форму варто зробити трохи менше, оскільки програвач відтворює тільки аудіо-файли. Для форми можна встановити ширину (Width) рівну 300, а висоту (Height) - 200, тепер змінити вид вікна і встановити BorderStyle в значення bsSizeToolWin, а заголовок (Caption) - "Simple Media Player".
Тепер запрограмуємо пункт "Вихід" - для цього слід написати в його обробнику: Self.Close. Цей метод закриває поточну форму (Self - об'єкт, вибраний за умовчанням, форма) і завершує застосування.
Тепер потрібно зробити в меню елементарні команди управління відтворенням - Start, Stop, Pause.
Спершу додайте в заголовний рядок меню (туди, де "Файл") пункт "Управління". Потім додайте два пункти - "Старт / Стоп" і "Пауза". Запрограмувати ці команди легко. Для управління відтворенням служить набір методів Controls, а дізнатися поточний стан програвача можна з властивості PlayState. Нижче приведений початковий код обробника пункту "Старт / Стоп":
if MediaPlayer.PlayState =wmppsPlaying then
MediaPlayer.Controls.Stop
else
MediaPlayer.Controls.Play;
обробник "Паузи":
if MediaPlayer.PlayState =wmppsPlaying then
MediaPlayer.Controls.Pause;
Запустіть програму і перевірте її працездатність.
Рис.3
Зазвичай під час відтворення можна бачити назву файлу, який програється зараз. Для цього необхідно змінити обробник пункту меню "Відкрити" на наступний код:
if OpenDialog.Execute then
begin
MediaPlayer.URL:=OpenDialog.FileName;
Form1.Caption:='SMP - '+ExtractFileName(OpenDialog.FileName);
end;
Функція ExtractFileName() повертає ім'я файлу з вказаного шляху - те, що нам потрібне. "SMP" - це скорочено "Simple Media Player" Нарешті, значення привласнюється заголовку форми.
Далі зробимо віконце "Про програму". Для цього в меню додайте відповідний пункт і назвіть його "Про програму..." По правилах Windows будь-який напис, що приводить до відкриття діалогового вікна, повинен закінчуватися багатокрапкою - "..." Вікно можна створити "з нуля": File - New - Form (у різних версіях Delphi назви пунктів меню можуть відрізнятися). А можна скористатися вікном, підготовленим розробниками, - відкриваємо File - New - Other, переходимо на вкладку Forms, вибираємо "About box" і натискаємо "ОК". В результаті створюється форма. У ній напишіть назву програми. Далі створюємо обробник для створеного пункту меню
AboutBox.ShowModal;
Рис.4