Bilder von DLL in ImageList

[dominikkv]

Hi

ich habe Bilder zu einer Ressource einer DLL hinzugefügt (Tutorial)
Nun möchte ich die Bilder in eine Imagelist laden.
Das mache ich bisher so:

Delphi-Quellcode:

procedure TForm1.LoadImages;
var
  h :HINST; 
  r :TResourceStream;
  j :TJpegImage;
  im: TImage;
begin
  h := LoadLibrary('pBilder.dll');
  if h <> 0 then
  begin
    r := TResourceStream.Create(h, 'Bild1', 'Jpeg');
    j := TJpegImage.Create;
    im := TImage.create(self);
      try 
        j.LoadFromStream(r);
        Im.Picture.Bitmap.Assign(j);
        test.Add(im.Picture.Bitmap, im.Picture.Bitmap);  // test ist die ImageList
      finally
        j.Free;
        r.Free;
        im.free;
      end;
  end; 
  FreeLibrary(h);
end;

Blöderweise kommt nach der Procedur eine AV.
Also wenn ich Schritt-für-Schritt Debugging mache klappt die Prozedur ohne Probleme, dannach kommen ein paar Assembleranweisungen und dann die AV.

Ohne die Procedur kommt die AV nicht.

Meine Frage also:
Was mach ich falsch bzw gibt es einen "professionelleren" Weg als meinen?

mfg.Dominik