Вниз
Скачать: CL | DM;

Вернемся к Delphi   Найти похожие ветки 

← →
Stavskiy   (2004-12-02 22:35) [0]

Нужна помощь, кто знает напишите пожалуйста код с описанием.
Как организовать Последовательное проигравание файлов(Mp3), через
MediaPlayer. Что бы можно было в любое время прервать и начать проигрование с новой позиции.
!!!Выручайте, вроде просто, а не получается.


← →
TButton ©   (2004-12-02 22:40) [1]

1. берем список файлов
2. n:=-1; // нулевой файл в списке
3. пока n<list.Count-1 делаем
3.1 воспроизводим файл
4. фисо


← →
Stavskiy   (2004-12-02 22:47) [2]

Просто после воспроизведения 1-го файла в списке кнопка Play, становится активна, хотя и воспроизводитя следующий файл. Если ее нажать - прога виснет.


← →
TButton ©   (2004-12-02 22:50) [3]

ой! простите меня люди дуру грешнуюююю!
1. берем список файлов
2. n:=-1; // нулевой файл в списке
3. пока n<list.Count-1 делаем
3.1 воспроизводим файл
3.2 n:=n+1
4. фисо


> Просто после воспроизведения 1-го файла в списке кнопка
> Play, становится активна, хотя и воспроизводитя следующий
> файл. Если ее нажать - прога виснет.

знаешь, я с медиаплеером не общался, но думаю, что стопорить его требо каждый раз, причем - ручками.


← →
Stavskiy   (2004-12-02 22:56) [4]

Вообще насколько я понял, у меня проблема в большей степени не с олгоритмом последовательности файла, но за пример спасибо, а с событием по которому надо отлавливать конец воспроизведения.


← →
TButton ©   (2004-12-02 23:03) [5]


> событием по которому надо отлавливать конец воспроизведения

от! от это я и имел в виду.


← →
Mihey_temporary ©   (2004-12-02 23:03) [6]


> Вообще насколько я понял, у меня проблема в большей степени
> не с олгоритмом последовательности файла, но за пример спасибо,
> а с событием по которому надо отлавливать конец воспроизведения.


См. событие OnNotify и стандартный пример в справке.


← →
Stavskiy   (2004-12-02 23:06) [7]

Вот именно с ним и траблы, Notify=false wait=true или ... ??????



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.029 c
1-1102005229
Unknown user
2004-12-02 19:33
2004.12.19
Соответствие классов


1-1101985536
Zif
2004-12-02 14:05
2004.12.19
Удобные сворачивающиеся Begin...end в delphi 8


14-1101756973
_none_
2004-11-29 22:36
2004.12.19
>Почему у Microsoft ничего не выйдет с .Net


1-1101969351
Frozzen
2004-12-02 09:35
2004.12.19
Алгоритмы защиты от свободного копированя


14-1101549347
KilkennyCat
2004-11-27 12:55
2004.12.19
Забавно, но факт, дающий пищу для размышлений...




   Наверх