Форум: "Media";
Текущий архив: 2004.05.02;
Скачать: [xml.tar.bz2];
Внизmediaplayer Найти похожие ветки
← →
iudjen © (2004-01-31 17:25) [0]как зделать чтобы при заканчивание песни listbox переходил на слежующую песню в списке
← →
iudjen_21 (2004-01-31 17:26) [1]Пожалуйста только не стерайте это сообщение.
← →
Mihey © (2004-01-31 17:44) [2]Когда композиция заканчивается, возникает событие OnNotify. Его и обрабатывай.
← →
Batoon © (2004-02-03 20:18) [3]Я делал так (если воспроизводишь с помощью TMediaplayer):
1. Ввел переменную index:integer, которая равнялась номеру индекса воспроизводимой строки(песни);
Поставил на форму TTimer и у него в событие OnTimer написал:var
i:integer;
begin
if mediaplayer1.position = mediaplayer1.lenght then
begin
mediaplayer1.stop;
mediaplayer1.close;
mediaplayer1.filename:=listbox1.items.strings[index+listbox1.itemindex];
mediaplayer1.open;
mediaplayer1.play;
index:=listbox1.itemindex;
end;
end;
3. Если я нигде не ошибся и ты все понял, то все получиться!!!
Страницы: 1 вся ветка
Форум: "Media";
Текущий архив: 2004.05.02;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.04 c