我想把资源文件中的wav文件保存出来，但是运行后保存的wav文件不能正常打开，请问如何将资源文件中的资源解压出来成正常的文件？

Question

procedure TForm1.Button1Click(Sender: TObject);
var
  RS: TResourceStream;
begin
  RS := TResourceStream.Create(Hinstance, 'test', RT_RCDATA); //RT_RCDATA表示任类型的数据
  RS.SaveToFile('test.wav');
  MediaPlayer1.FileName := 'test.wav';
  MediaPlayer1.Open;
end;

Answer 1

//建立一个.rc文件。然后编译成资源文件，并在工程文件中加入该资源文件
test RCDATA "d:\Music\万水千山纵横.wav"//保存资源
procedure TForm1.Button1Click(Sender: TObject);
var
  RS: TResourceStream;
begin
  RS := TResourceStream.Create(Hinstance, 'test', RT_RCDATA); //RT_RCDATA表示任类型的数据
  RS.SaveToFile('test.wav');
  MediaPlayer1.FileName := 'test.wav';
  MediaPlayer1.Open;
end; 

Answer 2

太感谢了，我回去试一试，如果成功就立刻给分！
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.
Thank you very much.