Player Basico

1ª Abra o Delphi 7 ou 6

2ª Adicione
MediaPlayer1 (paleta System)
BitBtn1 ou Button ou SpeedButon
OpenDialog1 (paleta Dialogs)
E coloque os componentes assim ou do jeito que vc quiser

3ªclique uma vez em cima do OpenDialog1 e vá na propriedade Filter clique no campo e vai ter 3 pontinhos(...) clique nele e abrira isso

4ª configure File assim como eu configurei veja na imagen baixo

5ªagora configure
BitBtn1 ou Button1
caption : Localizar
e pronto

6ª Agora de um duplo clique no Button ou BitBtn e Coloque este codigo

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

7ª e pronto agora e so conpilar e v se dar errose dar me manda email ou add msn
Dhionathans_felix@hotmail.com