Uses mmsystem; // 먼저 Uses 절에 mmsystem을 등록 한다
procedure TForm1.Button12Click(Sender: TObject);
begin
   PlaySound(Pchar('XXX.WAV'),0, SND_SYNC);
end;

위와같이 작성하여 주면 간단하게 WAV 파일이 재생된다..

 

전에는 이런 저런 Component를 등록하여 사용하였는데 왜그리 복잡하게 했는지 모르겠다...