Transparentes Bitmap malen

• *.h

private:

void __fastcall TForm1::DrawTransparentBitmap(TCanvas *Canvas, Graphics::TBitmap *Bitmap,TColor TransparentColor, int X, int Y);

• *.cpp

void __fastcall TForm1::DrawTransparentBitmap(TCanvas *Canvas, Graphics::TBitmap *Bitmap, TColor TransparentColor, int X, int Y)
{
    // Auf Canvas wird das Bild gemalt
    // Bitmap ist das Bild
    // TransparentColor = Hintergrundfarbe
    // X und Y = Koordinaten auf dem Canvas

    TImageList *ImageList = new TImageList(this);
    ImageList->Width = Bitmap->Width;
    ImageList->Height = Bitmap->Height;
    ImageList->AddMasked(Bitmap, TransparentColor);
    ImageList->Draw(Canvas, X, Y, 0);
    delete ImageList;
}