Delphi разработка под Android: FMX.Media.TMediaPlayer или пишем свой mp3-плеер для Android

пятница, 29 ноября 2013 г.

FMX.Media.TMediaPlayer или пишем свой mp3-плеер для Android

Внимание! Старая версия заметки более не актуальна, т.к. была написана для Delphi XE5/XE6. Это новая версия заметки, используется версия Delphi 10.3.3. Пример из данной статьи можно использовать на версиях ниже Delphi 10.3.3.

Обновление от 03.12.2019.

В старой статье я предлагал вам написать mp3-плеер на основе компонента TMediaPlayer. С тех пор, в комплекте с новыми версиями IDE идёт достаточное количество примеров работы с этим компонентом. Поэтому в новой версии статьи я дам короткое описание функциям плеера и выложу исходный (новый) код.

Описание реализованных функций плеера:
•    Плеер работает под Android и Windows
•    Поиск mp3 файлов по пути TPath.GetSharedMusicPath (вы можете указать любой другой)
•    Воспроизведение, установка паузы, перемотка
•    Переключение между треками (предыдущий, следующий)
•    Воспроизведение рандомного трека
•    Воспроизведение треков по кругу

Техническая заметка.

Внимание! На версии Delphi 10.2.2 и выше обнаружен баг со свойствами CurrentTime и Duration, поэтому перемотка и отображение прогресса проигрывания трека НЕ работают на Android. Под Windows всё работает. Баг: RSP-26475

Путь получаемый из TPath.GetSharedMusicPath: