[Video-Aula/Tutorial]Como fazer um Player de Música com Delphi

[' Fire~* 0]

Bom,hoje ensinarei a vocês como fazer um Player de Música Básico,ainda falta aprimorar, mas com o tempo eu vou atualizando

os codigos, =). Vamos ao Tutorial

 

Video-Aula Feita por mim mesmo :rock:

 

 

 

 

Caso não gostar de Video-Aula Use o Tutorial

 

 

Requesitos:

-4 Buttons (Standard)

-1 ListBox (Standard)

-1 OpenDialog(Dialogs)

-1 MediaPlayer(System)

-Conhecimento básico em Delphi(Delphi 7)

 

Tutorial

Organize assim:

 

ListBox

MediaPlayer

Button1(Adicionar Músicas) Button2(Executar) Button3(Próximo) Button4(Anterior) >>Coloque os nomes dos Botãos<<

OpenDialog

 

Códigos

 

No Button1 Adicione o seguinte código :

if OpenDialog1.Execute then

Listbox1.Items := OpenDialog1.Files;

 

No Button2 Adicione o seguinte código :MediaPlayer1.FileName := Listbox1.Items.Strings[Listbox1.itemindex];

MediaPlayer1.Open;

MediaPlayer1.Play;

 

No Button3 Adicione o seguinte código :ListBox1.ItemIndex := ListBox1.ItemIndex +1;

MediaPlayer1.Open;

 

No Button4 Adicione o seguinte código :ListBox1.ItemIndex := ListBox1.ItemIndex -1;

MediaPlayer1.Open;

 

E, por último adicione o seguinte código no Form1 :ListBox1.ItemIndex := 1;

 

Aperte F9 para ver o resultado ! =)Para ouvir uma musica basta apenas adicioná-la,depois clique no seu "nome" e por fim clique no EXECUTAR =) !

 

Eu fiz esse Player de música "correndo",vocês poderiam aprimorá-lo colocando uma fonte mais bonitinha nos buttons,etc.

> Fim,Gostou AGRADEÇA <

[DragonBoss 4]

hum, tutoriais tem aos montes por ae... mas gostei do video...

mas, vc poderia melhorar o topico colokando os codigos em tags como PHP.

 

mas enfim,vo contribuir com o tuto:

 

Coloque uma progressbar e um Timer (dexa o enabled do timer como false), e no timer coloque esse code:

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

e no code do button pra dar play.. adicione isso no fim:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

assim a progressbar acompanha o progresso da musika...

 

 

flw, abraçs

[TH3 CH4OS 4]

Topico Repetido , Closed!

[Apster 1]

@Topic

Não é nada de mais, mas gostei !

Parabéns, boa sorte em Futuros Projetos !

 

@TH3 CH4OS

Você não pode dar Closed

Isso é flood Primário !

[Owner 4]

#Th3 C4os você não é moderador para dizer que é close !

Isso é infração ( Flodd Primário )

 

#Topico

Por existirem muito infelizmente

Tá muito legal o video !

A dica do Dragon Boss ficou bem legal

Pode também colocar um TrackBar ficaria bem legal (:

Até e Abrasz

[viniiie. 0]

@TH3 CH4OS

Infracionado por flood primário.

 

 

 

Tópico muito bom e informativo

EO JA HAVIA ESQECIDO COMO SE FAZIA UMA PLAYERZIN DESTES

agora voltei a ativa no Delphi *-*

mto obg (Y)

[Owner 4]

Fiz o meu como teste !

Olha como ficou:

- Coloquei um trackbar pra acompanhar o processo da música

Mas nem tentei colocar para passar música pelo trackbar (:

Se alguém quiser o Source, só pedir !

Até e Abrasz