Авто переключение с трека на трек при воспроизведении (TMediaPlayer)

Posted by obzor under Delphi

Не могу сделать автоматическое переключение на следующий трек при воспроизведении. Может, подскажет кто-нибудь какой нужен код для этого? Использую стандартный компонент TMediaPlayer.

BLACK_RAIN

Забудьте про компонент TMediaPlayer и пользуйтесь DirectShow. Это куда более функционально. С его помощью можно воспроизводить не только видео, но и аудио-файлы тоже.
Переключение трека можно сделать, обработав событие EC_COMPLETE интерфейса IMediaEventEx

        while pMediaEvent.GetEvent(n, L1, l2, 1) = S_OK do
        begin
          if n = EC_COMPLETE then
          begin
           // тут разрушаем граф, меняем имя файла  и строим новый граф уже с новым трэком
           // или просто останавливаем дискотеку
          end;
          pMediaEvent.FreeEventParams(n, l1, l2); // про это не забываем
        end;

Replicant

Согласен с BLACK_RAIN, TMediaPlayer -шлак! Писал когда-то плеер на bass.dll, советую.

тема на форуме

Похожие статьи

• Генерация и синтез звуковых волн
• Взять кадр из видео без остановки видео потока (BASSVIDEO)
• Работа с графическим планшетом wacom stu-300 средствами Делфи
• Быстрое отражение изображения в Делфи
• Сравнение изображений
• как обрезать изоображение в формате jpeg
• Ластик для имиджа image1
• Громкость определенного момента времени
• Проигрывание видео, как сделать на весь экран?
• Как сделать плей лист для медиа плеера?