Konvertierung TBitMap -> TOleGraphic

[Wathlon]

Hallo,

ich habe Delphi 7 Prof.

Mein Problem ist, dass ich eine

TImageList habe und die einzelnen Bitmaps in eine TOleGraphic für ein COM-Objekt schieben muss.

Delphi-Quellcode:

    ImageList1.GetBitmap(0, aBmp);
    FOleGrAAM.Assign(aBmp);

So, wie ich das geschrieben habe, geht es leider nicht.

Danke für die Hilfe.

Gruß Walter