Utilizando o componente WindowsMediaPlayer do delphi7

--------------------------------------------------------------------------------------
Tutorial escrito:

1 - você vai adicionar o componente WindowsMediaPlayer...

Depois de clicar em Import ActiveX Control proucura por WindowsMediaPlayer... (Siga a imagem)

Vá na aba (System) e selecione o Item WindowsMediaplayer...

E o coloque no form...

---------------------------------------------------------------------------------------
2 - Vamos utilizar....

1 - opendialog (Dialogs)
1 - XPManifest (Win32)
1 - MainMenu (Standard)

--------------------------------------------------------------------------------------
Selecione o WindowsMediaPlayer e vá na objectInspector e Coloque seu align em (alClient)...
--------------------------------------------------------------------------------------
Dê um duplo clique no "MainMenu" e mude o caption do 1º menu para ("Abrir")

---------------------------------------------------------------------------------

Vamos programar...

No menu abrir você vai digitar isso... (Entre o "begin e o end")

if OpenDialog1.Execute then
begin
WindowsMediaPlayer1.URL:= OpenDialog1.FileName;
end;
----------------------------------------------------------------------------
Salve compile e teste...