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

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 вся ветка

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



Память: 0.45 MB
Время: 0.023 c