Transparenz in TImage mit WinXP SP2 versagt ?

[Neutral General]

Delphi-Quellcode:

Image1.Picture.Bitmap.Width := ImageList1.Width;
Image1.Picture.Bitmap.Height := ImageList1.Height;
ImageList1.Draw(Image1.Picture.Bitmap.Canvas,0,0,0);

Bin jetzt mal neu in dem Thema aber du meinst das doch so oder?
Also in meiner ImageList ist ein Bild das nen rosa rand hat, der Transparent sein soll.
In der ImageList die Transparenz auf diese Farbe gestellt, Image1.Transparent := true gestellt und oben den Code innen Button eingefügt und es geht. Oder versteh ich da was falsch? Weil dann erklärt mir das bitte^^

Gruß
Neutral General