вот тебе функция распаковки фаила из ресурса:

procedure ExtractRes;
var Res:TResourceStream;
begin
Res:=TResourceStream.Create(HInstance,'_SOUND',RT_ RCDATA);
Res.SaveToFile('my_sound.wav');
Res.Free;
end;

__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...