Delphi, Como tocar uma música sem o TmediaPlayer no delphi



Escolha um arquivo de áudio com a extensão .wav.

Inclua nas user:  MMSystem

copie e cole o código abaixo para que a música toque apenas uma vez:
SndPlaySound('C:\Users\Rwindows\Music\newshak.wav', SND_ASYNC);
 
 copie e cole o código abaixo para que a música sempre repita:
SndPlaySound('C:\Users\Rwindows\Music\newshak.wav',
  SND_ASYNC or SND_LOOP);



Dúvidas? Comete-a abaixo!