Você não está conectado. Conecte-se ou registre-se

Ver o tópico anterior Ver o tópico seguinte Ir em baixo  Mensagem [Página 1 de 1]

1 [TUTORIAL]como criar um player no delphi em Sex Abr 29, 2011 6:03 pm

gun`s rose

Membro
Membro

avatar
Sumário:
- Arquivos nescessários.
- Tutorial.
- Créditos.



- Arquivos nescessários:
Delphi 7

- Tutorial:
1ªabra o delphi e tente deixar a form dessa forma



Em seguida, adicione um TButton ( localizado na parte Standart ), um TOpenDialog ( localizado na parte Dialogs ) e um TMediaPlayer ( localizado na parte System ):



Organize mais ou menos assim:


Agora renomeie o TButton para "Abir" pelo Caption:



agora de um clike duplo no botão apague isso:


Código:
procedure TForm1.Button1Click(Sender: TObject);

begin

E adicione isso:


Código:
procedure TForm1.BitBtn1Click(Sender: TObject);
begin
 MediaPlayer1.Close;
 if OpenDialog1.Execute then
 begin
  MediaPlayer1.FileName := OpenDialog1.FileName;
  MediaPlayer1.Open;
 end;
end;

Então, vá na propriedade "Filter" do objeto TOpenDialog e adicione os seguintes itens:



Agora Salve e Compile o seu projeto.


- Créditos:
Os créditos vão para mim, pelo tutorial postado aqui e algumas
fotos.Créditos também para o Delphi-School pelo baseamento do tópico e 1
imagem.

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo  Mensagem [Página 1 de 1]

Permissão deste fórum:
Você não pode responder aos tópicos neste fórum