Salut,
donc pour utiliser Media player c'est simple :
procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(Handle, nil, '"C:\Program Files\Windows Media Player\wmplayer.exe"', '"c:\windows\media\tada.wav"', nil, SW_SHOW);
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
ShellExecute(Handle, nil, '"C:\Program Files\Windows Media Player\wmplayer.exe"', '"c:\windows\media\Windows XP Démarrage.wav"', nil, SW_SHOW);
end;
tu peux les utiliser dans n'importe quel ordre si media player est déjà ouvert il lit uniquement le fichier passé en paramètre
surtout ne pas oublier de mettre les guiellemets ' " " '
@+
Cirec