VCL 和 Firemonkey 的 Bitmap 处理像素的方式不相同，下例为将图片内不是「白色」的像素全部改成「黑色」：
Image1.Bitmap.Map(TMapAccess.maWrite,vBitMapData)
x:= Image1.Bitmap.Width -
y:= Image1.Bitmap.Height -
vBitMapData.GetPixel(x,y) <> TAlphaColors.White ;