Bilder aus Dll einbinden?

[Lotus]

Also das steht in meinem Projekt, wo ich die Bilder benutzen möchte:

Delphi-Quellcode:

procedure images();
var
  h :HINST;
  r :TResourceStream;
  j :TJpegImage;
  i :integer;
begin
  h := LoadLibrary('Bilder.dll');
  if h <> 0 then begin
    r := TResourceStream.Create(h, 'BILD1', RT_RCDATA);
    j := TJpegImage.Create;
      try
        j.LoadFromStream(r);
        Form1.Image1.Picture.Bitmap.Assign(j);
      finally
        j.Free;
        r.Free;
      end;
  FreeLibrary(h);
end
  else
    RaiseLastOSError();
end;