Otra solución, si no quieres usar el
TMediaPlayer, es el API de Windows y utilizar, por ejemplo, la función
PlaySound:
Código Delphi
[-]
uses
MMsystem;
procedure TForm1.Button1Click(Sender: TObject);
begin
PlaySound('c:\windows\media\Entrada de Windows XP.wav', 0, SND_FILENAME or
SND_ASYNC);
end;
El ejemplo reproduciría el archivo especificado de forma asíncrona, permitiendo que la aplicación haga otras cosas mientras se reproduce el sonido. (Creo que esto es lo que quieres ¿verdad?. De todas formas, revisa tambien la ayuda sobre las funciones y mensajes de
MCI)
Saludos!