Стр. 206 - Информатика. Программирование в среде Delphi. Часть 1

Информатика. Программирование в Delphi
206
Основные события компонента MediaPlayer приведены в табл. 15.2.
Таблица 15.2
Событие Условие возникновения
OnClick При нажатии какой-либо кнопки проигрывателя
OnEnter При получении компонентом фокуса
OnExit При потере компонентом фокуса
OnNotify При завершении какого-либо из методов проигрывателя
Пример 15.1
Разработать программу MP3 Player. Программа должна обеспечивать
возможность выбора каталога, в котором находятся mp3 файлы. Рекомендуе-
мый вид формы показан на рис. 15.2.
Выполним следующую последовательность действий.
1. Создадим новое приложение.
2. Добавим на форму компоненты: Label1 – Каталог, Label2, Timer1 , Ed-
it1 – C:\Windows\Media\, ListBox1 и MediaPlayer1 (рис. 15.2).
3. В разделе объявления имен процедур и функций объявим следующую
процедуру:
Рис. 15.2
//процедура формирует массив имен файлов в указанном каталоге
procedure GetFilePath(Path:string);