Was machst du da !!!
der Code muss so anfangen :
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
h :HINST;
r :TResourceStream;
begin
h := LoadLibrary('videos.dll');
if h <> 0 then begin
r := TResourceStream.Create(h, 'video1', 'RCDATA');
...