Как проиграть Wave-ресурс

Сначала делаешь файл SOUND.RC, в нем строка вида: MY_WAV RCDATA TEST.WAV Компилишь чем-нибyдь в *.RES

Далее в тексте:

{$R полное_имя_файла_с_ресурсом}

var

  WaveHandle: THandle;
  WavePointer: pointer;
...
  WaveHandle := FindResource(hInstance, 'MY_WAV', RT_RCDATA);
  if
 WaveHandle <> 0 then

  begin

    WaveHandle := LoadResource(hInstance, WaveHandle);
    if
 WaveHandle <> 0 then

    begin

      ;
      WavePointer := LockResource(WaveHandle);
      PlayResourceWave := sndPlaySound(WavePointer, snd_Memory or


        SND_ASYNC);
      UnlockResource(WaveHandle);
      FreeResource(WaveHandle);
    end
;
  end
;

Другое по теме:

• Загрузка строк из RES-файла
• Загрузка изображения или курсора из RES-файла
• Загрузить RTF файл из ресурса своего EXE