Como criar um Media Player no Delphi 7!

[BlackBeck~ 0]

Bom galera,este é meu primeiro tutorial e vou dividir em algumas partes para ficar mais organizado:

 

1ª Parte.: Colocando os itens necessários

2ª Parte.: Renomeando os itens

3ª Parte.: Colocando os Scripts

4ª Parte.: Acabamento //Configuração Final

 

-------------------- ,, ------------------------

 

1ª Parte.: Colocando os itens necessários

Vamos precisar de:

- 1 Timer //Se encontra na aba System

- 4 Buttons ou Images //o Button se encontra na aba Standard e a Image se enconta na aba Additional

- 1 OpenDialog //Se encontra na aba Dialogs

- 1 Timer //Se encontra na aba System

- 1 MediaPlayer //Se encontra na aba System

- 1 ProgressBar //Se encontra na aba Win32

Ficará quase igual este exemplo:

 

---------------------,,-------------------------

 

2ª Parte.: Renomeando os itens

Renomeie da seguinte forma:

Se você colocou Buttons renomeie na Caption //Já se você colocou Imagem carregue uma ai por exemplo a de um símbolo de "+"

-1º Button :::> Abrir

- 2º Button :::> Play

- 3º Button :::> Pause

- 4º Button :::> Stop

- MediaPlayer1 :::> MP1

- ProgressBar1 :::>PB1

- OpenDialog1 :::> OD1

- O resto deixe om está

OBS.: No MP1 deixe o Visible em False

 

---------------------,,-------------------------

 

3ª Parte.: Arrumando os scripts

Faça da seguinte maneira:

 

Abrir:

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

• Entre
• ou
• Cadastre-se

 

Play

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

• Entre
• ou
• Cadastre-se

 

Pause

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

• Entre
• ou
• Cadastre-se

 

Stop

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

• Entre
• ou
• Cadastre-se

 

Timer1

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

• Entre
• ou
• Cadastre-se

 

---------------------,,-------------------------

 

4ª Parte.: Acabamento //Configuração Final

Faça assim:

- 1º: Selecione o OD1 que é o OpenDialog1

- 2º: Vá em Filter e clique nos três pontinhos "..."

- 3º: Deixe assim ↓

 

All Music Files|*.mp3;*.wav;*.wma

All Video Files|*.wmv;*.avi;*.mp4;*.mp3;*.mpg

 

Pronto!

 

Agora cliquem no Triangulo verde lá em cima ou aperte F9 para testar

 

 

 

QUALQUER DUVIDA POSTEM :D

[..:Reborns:.. 3]

Tópico Movido Para:

 

 

Delphi/VB

[Refuse. 0]

Muito interessante essa maneira.

As outras que já tinha visto, não usava o Timer.

Mas a função dele, ao certo, é mostrar o tempo da música ou tem alguma outra função?

[C£rberus 1]

Ficou bom, mas os padrões de ficheiro são os mesmos que o windows já possui, se adicionasse outros tipo .flv .rmb ... etc ficaria melhor !

[iMelo~' 15]

O Tutorial é bom cara realmente é bom mas conteudo existente: http://www.webcheats.com.br/forum/delphi-vb/153045-tutorial-criando-um-player-bascio-delphi-7-a.html

[BlackBeck~ 0]

Obrigado ..:Reborns:.., é porque foi meu primeiro tópico :ironico:

[iMelo~' 15]

Leia este tópico: http://www.webcheats.com.br/forum/tutoriais-wc/415317-ferramentas-basicas-em-um-topico.html

 

Será muito util para voce criar novos tópicos !

[BlackBeck~ 0]

Em resposta de:

"Ficou bom, mas os padrões de ficheiro são os mesmos que o windows já possui, se adicionasse outros tipo .flv .rmb ... etc ficaria melhor !"

 

Sim, mas se você coloca-los também irá funcionar :smiley:

[iMelo~' 15]

Apenas editar pelo opendialog , facil facil demais , acho que voce poderia editar o topico com prints ensinando a por mais formatos de música ^^

[BlackBeck~ 0]

Assim Refuse., ele tem duas funções, a de mostrar o tempo da música e dela não parar no meio. :smiley:

 

Apenas editar pelo opendialog , facil facil demais , acho que voce poderia editar o topico com prints ensinando a por mais formatos de música ^^

 

Ok, obrigado na proxima tentarei melhorar :D

[g25 0]

Muito bom o player fiz um teste aqui e aprovei!

 

#Mas tem um problema ele não roda videos, é so o audio dos videos!

[iMelo~' 15]

Use o mediaplayer para rodar cara !

[felipescatolin 0]

Use o mediaplayer para rodar cara !

 

rsrsrsrsrs

 

 

Enfim ...

 

Aqui ta dando erro.

[iMelo~' 15]

Poste uma print ou algo do mesmo para assim eu poder ajudar voce cara

[SifrSkar 0]

O Tutorial é bom cara realmente é bom mas conteudo existente: http://www.webcheats.com.br/forum/delphi-vb/153045-tutorial-criando-um-player-bascio-delphi-7-a.html

 

sim o conteudo e realmente existente,mas você não acha que é bom deixar membros se expressar, e postar novos topicos sobre o mesmo tutorial de uma outra maneira ???

eu acho aqui na webcheats bem confuso não posder postar topicos com algum conteudo ja existente pois se outro usuario quer fazer de um outro jeito as vezes pode ser prejudicado por causa disto não acha ?????

eu acho e apoio criação de topicos do mesmo conteudo mais explicado de maneiras diferentes ou de outros jeitos ^^

[iMelo~' 15]

Sim , entendo a parte dos membros mas temos uma regra de não por 2x o mesmo conteudo rs , leia as regras brow ^^

[gaabscps 7]

Só é considerado conteúdo duplicado quando (ou boa parte do conteúdo) é tudo igual.

No caso, é bem diferente.

A finalidade é a mesma, mas a forma que ensina é diferente.

 

Então, não faz sentido fechar o tópico; apesar de não ser tão necessário criar um outro tutorial sobre algo que já existe no fórum.