Show any graphics format as Glyph on a SpeedButton

TBitBtn dan TSpeedButton hanya bisa menerima picture berformat BMp , jika kita hanya memiliki format ICO atau JPG dan ingin menampilkan sebagai Glyph, kita butuh konversi ke Bitmap, berikut Langkahnya :

~~~~~~~~~~~~~~~~~~~~~~~~~
var
___bmp: TBitmap;
begin
___bmp:=TBitmap.Create;
___try
______bmp.Width := Image.Picture.Graphic.Width;
______bmp.Height := Image.Picture.Graphic.Height;
______bmp.Canvas.Draw(0, 0, Image.Picture.Graphic) ;
______BitBtn.Glyph:=bmp;
___finally
______bmp.Free;
___end;
end;
~~~~~~~~~~~~~~~~~~~~~~~~~