[Tutorial] Criando um Player Báscio [ Delphi 7 ]

Sumário:

- Arquivos nescessários.
- Tutorial.
- Créditos.
- Agradecimentos.

Arquivos nescessários

Delphi 7

- Tutorial:

Primeiramente abra o Delphi e redimensione a tela da Form até que fique mais ou menos desta maneira




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:




Dê um duplo clique no TButton, apague o código

procedure TForm1.Button1Click(Sender: TObject);
begin

e adicione o seguinte código:

Código:

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






BY:kibkarj


META: MOD. GLOBAL

Maano , Boom tópic mais eu não manjo mt disso .

-Definindo . Nãao entendi nada

muito bom continue assim

avisado por Flood

passa dow do delphi

não ta muito bom mais ta bom
@sugestão
print de onde fica TMediaPlayer