SpeedButton Glyph Transparent machen...

[FriFra]

Ich weise meinen SpeedButtons zur Laufzeit Glyphen aus einer Imagelist zu, aber diese haben leider einen Weißen (clWindows) Hintergrund...

Delphi-Quellcode:

  Bmp := TBitmap.Create;
  try
    FMainMenu.Images.GetBitmap(8, Bmp);
    SpeedButton2.Glyph.Assign(Bmp);
    SpeedButton2.NumGlyphs := 1;
  finally
    Bmp.Free;
  end;

Es bringt auch nichts, dem Glyphen (der ja eigentlich ein normales Bitmap ist) eine Transparenzfarbe zuzuweisen...
Dieser Code bringt mir auch nur Glyphen mit weißem Hintergrund:

Delphi-Quellcode:

  Bmp := TBitmap.Create;
  try
    FMainMenu.Images.GetBitmap(8, Bmp);
    SpeedButton2.Glyph.Assign(Bmp);
    SpeedButton2.Glyph.TransparentColor := SpeedButton2.Glyph.Canvas.Pixels[0,
      15];
    SpeedButton2.Glyph.Transparent := true;
    SpeedButton2.NumGlyphs := 1;
  finally
    Bmp.Free;
  end;

Es bringt übrigens auch nichts der ImageList vor dem Auslesen der Images BkColor=clNone zuzuweisen...