Форум: "Media";
Текущий архив: 2007.05.20;
Скачать: [xml.tar.bz2];
Вниз
Play List Найти похожие ветки
← →
ScoPal (2006-09-07 13:16) [0]Каким образом проще всего проиграть загруженный play list... все песни подряд?
← →
DVM © (2006-09-07 15:32) [1]Циклом и TMediaPlayer-ом.
← →
ScoPal (2006-09-07 15:57) [2]Это я понимаю... но не получается... список песен в ListBox находится... И если делать MediaPlayer1.FileName из данного списка, то ничего не работает :(
← →
DVM © (2006-09-07 16:02) [3]
> И если делать MediaPlayer1.FileName из данного списка, то
> ничего не работает :(
Да ну?
У тебя в ListBox находятся пути к файлам или только имена?
У тебя ошибка в 17 строке.
← →
ScoPal (2006-09-07 16:17) [4]Нет... он их проигрывает все ... только быстренько перебирая... т.е. не до конца. Вот и думаю как бы чтобы песенка полность отыграла. И затем следующая началась. С одной в цикле без проблем, а вот когда их много :(
← →
DVM © (2006-09-07 16:23) [5]
> Нет... он их проигрывает все ... только быстренько перебирая
TMediaPlayer.OnNotify - событие тебе поможет.
Проверяй достиг ли плейер конца файла, если да то подсовывай следующий.
Цикл не нужен.
← →
ScoPal (2006-09-07 16:26) [6]Это уже пройденный этап, может правда что не правильно написано было...
Как проверить достиг ли конца файла... может в этом и была ошибка??
← →
DVM © (2006-09-07 16:31) [7]Наверное, что-то в этом духе
if mediaplayer1.Mode = mpStopped then ...
Или по таймеру проверять позицию воспроизведения и сравнивать с длиной файла.
← →
Graphics © (2006-09-10 02:25) [8]procedure TForm1.MediaPlayer1Notify(Sender: TObject);
begin
If MediaPlayer1.Length = MediaPlayer1.Position then
PlayNext; //след. дорожка, я сам так и сделал!
end;
← →
ScoPal (2006-09-11 10:00) [9]Спасибо
Страницы: 1 вся ветка
Форум: "Media";
Текущий архив: 2007.05.20;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.046 c
