Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.12.19;
Скачать: 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 вся ветка

Текущий архив: 2004.12.19;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.051 c
1-1101970372
VAV
2004-12-02 09:52
2004.12.19
LMDWeb компоненты


3-1101100426
АланЖук
2004-11-22 08:13
2004.12.19
IBConsole -> Tools -> Interactive SQL...


3-1100512234
REDiska
2004-11-15 12:50
2004.12.19
Delphi &amp; PostgreeSQL


3-1100622218
neznaika
2004-11-16 19:23
2004.12.19
TADOStoredProc->Parameters->?


14-1101451713
NewDelpher
2004-11-26 09:48
2004.12.19
Поиск в модуле нужной функции (процедуры) по имени