tengo un botón que llama a la cámara y saca una foto y la mueve a un TImagen, quiero guardar esa imagen desde la toma de la cámara o desde el TImagen en un archivo de imagenes dentro del android, utilice:
Código Delphi
[-]procedure TAccessCameraAppForm.TakePhotoFromCameraAction1DidFinishTaking(Image: TBitmap);
var
upLoadFolder,ImageName: string;
begin
upLoadFolder := TPath.GetDocumentsPath +TPath.DirectorySeparatorChar;
ImageName := 'test.jpg';
imgCameraImage.Bitmap.Assign(Image);
imgCameraImage.Bitmap.SaveToFile(upLoadFolder+ImageName);
Edit1.Text := upLoadFolder;
end;
me crea el directorio pero no la imagen.
Código Delphi
[-]procedure TAccessCameraAppForm.TakePhotoFromCameraAction1DidFinishTaking(Image: TBitmap);
var
upLoadFolder,ImageName: string;
begin
upLoadFolder := TPath.GetDocumentsPath +TPath.DirectorySeparatorChar;
ImageName := 'test.jpg';
Image.SaveToFile(upLoadFolder+ImageName);
imgCameraImage.Bitmap.Assign(Image);
Edit1.Text := upLoadFolder;
end;
me crea el directorio pero no la imagen.