La cargo una un evento del componente TActionList este es el codigo:
Código:
procedure TCameraRollForm.TakePhotoFromLibraryAction2DidFinishTaking(
Image: TBitmap);
var color: TColor;
begin
color:= $1FFFFFFF;
Image1.Bitmap.Assign(Image);
Image1.MultiResBitmap.TransparentColor:= color;
end;
Image1 es un componente TImage
Si yo lo hago desde la parte visual si se me carga la imagen sin el fondo ( ver imagenes), esto solo la primera ves ya que cuando preciono el boton para ir a la galeria y seleciono la foto de nuevo esta se vuelve a poner con el fondo negro.