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. Его и обрабатывай.

Я делал так (если воспроизводишь с помощью 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. Если я нигде не ошибся и ты все понял, то все получиться!!!

mediaplayer Найти похожие ветки