Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var myRes : TResourceStream;
begin
myRes:=TResourceStream.Create(Hinstance,'video1.mp3','23');
myRes.SaveToFile('video1.mp3');
myRes.free;
end;
HInstance muss natürlich das
Handle der
DLL sein, d.h. du musst vorher mit LoadLibrary die
DLL laden.