Bild in galerie ablegen (iOS, Android)

[Sherlock]

Ist eigentlich ziemlich einfach Code ungefähr so aus der Delphi Hilfe):

Delphi-Quellcode:

var 
  service: IFMXPhotoLibrary;
.
.
.
try
  if TPlatformServices.Current.SupportsPlatformService(IFMXPhotoLibrary, service) then
    service.AddImageToSavedPhotosAlbum(fMyPicture)
  else
    ShowMessage('The IFMXPhotoLibrary interface is not supported.');
except
  ShowMessage('IFMXPhotoLibrary.AddImageToPhotoAlbum failed');
end;

Der Knackpunkt ist allerdings die Berechtigung zum Schreiben ins Album. Das wird gesetzt durch die info.plist Einträge
NSPhotoLibraryUsageDescription und NSPhotoLibraryAddUsageDescription (Man beachte den feinen Unterschied, nötig ab iOS 11). vgl. dazu https://stackoverflow.com/questions/...photolibraryus

Der erste eintrag ist von Emba freundlicherweise schon abgelegt, den zweiten mußt du manuell in den Versionsinfos Deines Projekts hinzufügen, und mit einem mehr oder minder sinnigen Text hinterlegen (je nachdem, was Du Deinen Anwendern zumuten möchtest).

Sherlock