Среда, 24.04.2024, 21:43

Delphi

Приветствую Вас Гость

Друзья сайта
Статистика

Сегодня были:
Самые активные пользователи

Меню сайта
Наш опрос
Вы программируете на Delphi
Всего ответов: 180
[ Новые сообщения · Участники · Правила форума · Поиск · RSS ]
  • Страница 1 из 1
  • 1
Форум » MIDletPascal » Для новичков » музыка
музыка
ger1234567Дата: Четверг, 03.07.2008, 12:24 | Сообщение # 1
Рядовой
Группа: Проверенные
Сообщений: 7
Репутация: 0
Статус: Offline
как сделать чтоб сначало воспроизводило один файл после него автаматом другой
 
IvinДата: Четверг, 03.07.2008, 14:41 | Сообщение # 2
Admin
Группа: Администраторы
Сообщений: 46
Репутация: 0
Статус: Offline
Есть функция GetPlayerDuration
Quote
Возвращает продолжительность музыки (в миллесекундах), воспроизводимую плеером.

Вот примерный код:

if (GetRelativeTimeMs > GetPlayerDuration+SavedTime)
or (GetRelativeTimeMs < SavedTime) then
begin
SavedTime:=GetRelativeTimeMs;
OpenPlayer('/simple.mid', 'audio/midi');
SetPlayerCount(1);
StartPlayer;
end;

SavedTime - переменная в которую записываем время начала трека (когда мы его запустили).

Вроде должно работать, если что-то не так пиши. =)

 
IvinДата: Вторник, 24.02.2009, 22:48 | Сообщение # 3
Admin
Группа: Администраторы
Сообщений: 46
Репутация: 0
Статус: Offline
закрыто.
 
Форум » MIDletPascal » Для новичков » музыка
  • Страница 1 из 1
  • 1
Поиск: