Pues lo he resuelto de esta manera:
Código Delphi
[-]
Image1.Transparent:= True;
Image1.Picture.Bitmap.TransparentMode:= tmFixed;
Image1.Picture.Bitmap.PixelFormat:= pf32bit;
Image1.Picture.Bitmap.Transparent := True;
Image1.Picture.Bitmap.TransparentColor:= clWhite;
Form1.DoubleBuffered:= True
Y lo dibujo en:
Código Delphi
[-]
Image1.picture.bitmap.PixelFormat:= pf32bit;
Image1.picture.bitmap.canvas;
ImageList1.GetBitmap(0,Image1.Picture.Bitmap);
Para mis conocimientos me costó mucho e inclusive aún dudo si más adelante lo implemento me trabaje bien.