Bitmaps in DLL..

[movax]

also, ich hab's jetzt so gemacht:

Code:

[b]procedure[/b] TForm1.FormCreate(Sender: TObject);
[b]var[/b] 
  hLib: THandle;
[b]begin[/b]
  hLib := LoadLibrary(PChar('Tiles.dll'));
  [b]if[/b] hLib <> 0 [b]then[/b]
  [b]try[/b]
    ImageList1.ResInstLoad(hLib, rtBitmap, 'StrasseOben', clFuchsia);
  [b]finally[/b]
    FreeLibrary(hLib);
  [b]end[/b];
[b]end[/b];

"Tiles.dll" ist halt die DLL mit den Bitmaps drin und ImageList1 soll die ImageList-Komponente sein, in der die Bilder geladen werden.

die .rc-datei sieht so aus:

Code:

StrasseOben BITMAP "StrasseOben.bmp"
StrasseUnten BITMAP "StrasseUnten.bmp"

die .rc-datei liess sich auch so kompillieren.

Um das alles dann zu testen hab ich mir auf meine Form ein Image1 und einen Button gemacht, mit folgendem Code:

Code:

[b]procedure[/b] TForm1.Button1Click(Sender: TObject);
[b]var[/b] bild: tbitmap;
[b]begin[/b]
  bild := tbitmap.Create;
  Tiles.GetBitmap(0, bild);
  Image1.Canvas.Draw(0, 0, bild);
[b]end[/b];

wenn ich das programm dann starte und auf den button klicke passiert.. überhaupt nichts. Ja, okay, Image1 wird weiss, wegen dem Canvas-Zugriff.. aber das Bitmap wird nicht angezeigt!
Was hab ich falsch gemacht?

greetz,
-movax-