Пожалуй, это самый простой способ создания прозрачного изображения. Суть его в том, что маска создается автоматически во время выполнения программы, используя значение прозрачного цвета.

MaskBitmap := TBitmap.Create;
MaskBitmap.Assign(SrcBitmap);
MaskBitmap.Mask(FColor); //прозрачный цвет
BitBlt(DestBitmap.Canvas.Handle, x, y,
 SrcBitmap.Width, SrcBitmap.Height,
 MaskBitmap.Canvas.Handle, 0, 0, SRCAND);
BitBlt(DestBitmap.Canvas.Handle, x, y,
 SrcBitmap.Width, SrcBitmap.Height,
 SrcBitmap.Canvas.Handle, 0, 0, SRCINVERT);
MaskBitmap.Free;