Criando Player de musica

[Wasborn 1]

Player de musica

 

Ah um bom tempo eu venho tentando fazer um player de musica que tocasse as musicas de um ListBox, e finalmente descobri, ainda falta aprimorar, mas com o tempo eu vou atualizando os codigos, =). Vamos ao Tutorial

 

 

Requesitos:

-4 Buttons (Standard)

-1 ListBox (Standard)

-1 OpenDialog(Dialogs)

-1 MediaPlayer(System)

-Conhecimento básico em Delphi

 

Tutorial

 

Organize assim:

ListBox

MediaPlayer

Button1 Button2 Button3 Button4

OpenDialog

Códigos

 

No evento OnClick do Button1 coloque:

 

if OpenDialog1.Execute then

Listbox1.Items := OpenDialog1.Files;

 

Este código irá adicionar as músicas selecionadas no OpenDialog ao ListBox

________

 

No evento OnClick do Button2 coloque:

MediaPlayer1.FileName := Listbox1.Items.Strings[Listbox1.itemindex];

MediaPlayer1.Open;

MediaPlayer1.Play;

 

Este código irá executar as músicas do ListBox no MediaPlayer

_________

 

No evento OnClick do Button3 coloque:

 

ListBox1.ItemIndex := ListBox1.ItemIndex +1;

MediaPlayer1.Open;

 

Este código faz com que o Index do ListBox mude para a próxima música do ListBox

_________

 

No evento OnClick do Button4 coloque:

 

ListBox1.ItemIndex := ListBox1.ItemIndex -1;

MediaPlayer1.Open;

 

Este código faz com que o Index do ListBox mude para a música anterior do ListBox

_________

 

No evento OnCreate do Form1 coloque:

 

ListBox1.ItemIndex := 1;

 

Este é simples, é para quando o Form iniciar o Index do ListBox fique no primeiro item do ListBox

 

Visual(Opcional)

 

Para a melhor visualização do seu Projeto, adicione Label's onde for necessario, mude os Caption's dos Buttons de acordo com o código adicionado

 

Observações

 

Os códigos ainda devem ser aprimorados, então, apóes executar ele, ao invés de clickar em Play, click primeiro na música do ListBox e depois click Play

Quando for passar a música, click no Button responsavel pela mudança de música e depois Play

 

 

 

Créditos: Milly, ;*

[Duencao 0]

iae ta bom sim o seu player..

mais desse modo vai fica aparecendo o caminho da musica no listbox né??

tenta filtra só para o nome da musica...

coloca um botão de volume tb é boa ideia..

 

ja fiz um desses tb mas ja faz algum tempo ..rs

mais oq eu ñ consegui msm é fazer um player de video com suporte pra outras estenções como RMVB,MKV etc.

se alguem tive um code com isso ou sobé aviza ae plise.

 

mais o seu player ja ta dahora ..

 

flwwwwwwwwwwwwwwwwwwwww:D :D