Player

[SrMaster]

to fazendo um player,e preciso saber como faço pra quando acabar uma música ele ir automáticamente para outra? acabar a faxa 1 ir pra 2 e começar tocar,e também como colocar volume do player,sendo só do player ou alterando o sistema inteiro.

obrigado.

[Jhonas]

to fazendo um player,e preciso saber como faço pra quando acabar uma música ele ir automáticamente para outra? acabar a faxa 1 ir pra 2 e começar tocar,e também como colocar volume do player,sendo só do player ou alterando o sistema inteiro.

Pesquisa no forum ... tem muita coisa sobre o assunto

http://scriptbrasil.com.br/forum/index.php...highlite=player

abraço

[SrMaster]

to fazendo um player,e preciso saber como faço pra quando acabar uma música ele ir automáticamente para outra? acabar a faxa 1 ir pra 2 e começar tocar,e também como colocar volume do player,sendo só do player ou alterando o sistema inteiro.

Pesquisa no forum ... tem muita coisa sobre o assunto

http://scriptbrasil.com.br/forum/index.php...highlite=player

abraço

já olhei já,não consegui achar o que eu queria,ums que eu achei não entendi nada :blush:

[Jhonas]

já olhei já,não consegui achar o que eu queria,ums que eu achei não entendi nada

Veja neste endereço

http://rs218.rapidshare.com/files/97775364/Vers_o_1.0.1.zip

http://scriptbrasil.com.br/forum/index.php...st&p=476461

abraço

[SrMaster]

já olhei já,não consegui achar o que eu queria,ums que eu achei não entendi nada

Veja neste endereço

http://rs218.rapidshare.com/files/97775364/Vers_o_1.0.1.zip

http://scriptbrasil.com.br/forum/index.php...st&p=476461

abraço

já vi,não entendi nada,e na source não tem passa música sózinho.

[Jhonas]

já vi,não entendi nada,e na source não tem passa música sózinho.

Qual é o seu nível de conhecimento na linguagem ?

[Daniel Sanches]

é o seguinte ... o código abaixo faz um loop infinito na música/vídeo .. é só você adaptar para o que você quer ...

procedure TForm1.MediaPlayer1Notify(Sender: TObject);
begin
        if MediaPlayer1.Position = MediaPlayer1.Length then //chegou ao fim da música/video
        begin
                MediaPlayer1.Play;
        end;
end;

sempre que a música/vídeo chega ao fim, é enviado o evento notify ...

checando se a música terminou com position e length, é só você passar o caminho da nova música/vídeo e dar um play ...

abraços !!!

[SrMaster]

é o seguinte ... o código abaixo faz um loop infinito na música/vídeo .. é só você adaptar para o que você quer ...

procedure TForm1.MediaPlayer1Notify(Sender: TObject);
begin
        if MediaPlayer1.Position = MediaPlayer1.Length then //chegou ao fim da música/video
        begin
                MediaPlayer1.Play;
        end;
end;

sempre que a música/vídeo chega ao fim, é enviado o evento notify ... checando se a música terminou com position e length, é só você passar o caminho da nova música/vídeo e dar um play ... abraços !!!

tentei esse código.

if mp3Player.Position = mp3Player.Length then //chegou ao fim da música/video
begin
mp3list.ItemIndex := mp3list.ItemIndex +1;
mp3Player.Play;
end;
end;

só que ele toca a música anterior,exemplo,alí nesse código:

mp3list.ItemIndex := mp3list.ItemIndex +1;

ele seleciona a próxima música no listbox,só que no player ele toca a música anterior.

exemplo.

(negrito selecionada)

-jose

-maria

o player pega e toca a josé =o tem que da um jeito de ele identificar o que tá selecionado no listbox.

[Daniel Sanches]

você tem algum botão para ele pular para a próxima música ?? ele funciona ??

se sim, porque você não faz referência a esse botão direto ...

if mp3Player.Position = mp3Player.Length then //chegou ao fim da música/video
begin
      botao_proxima_musicaClick(Sender);
end;

testa aí ...

abraços !!

[Raficcha]

Cara, você pode pegar o tempo da musica (em segundos), e coloca um timer, e seta o "Interval" dele, para o tempo da musica * 1000. no evento OnTimer dele, coloca um comando para a brir a proxima musica

[Daniel Sanches]

o problema de se usar um timer é que se o usuário adiantar ou retroceder a música, o timer já fica fora ....

[Jhonas]

SrMaster ... perguntei qual era o seu nivel de conhecimento na linguagem ( já vi, não entendi nada, e na source não tem passa música sózinho.) , porque adicionando apenas 5 linhas de código ao código que te passei ( link abaixo ) irá funcionar da maneira como está querendo... ou seja tocar uma música finalizar e começar outra da lista automaticamente.

http://rs218.rapidshare.com/files/97775364/Vers_o_1.0.1.zip

abraço