Android, ein Bitmap speichern geht ncht

[Sir Rufo]

Also nochmal

Android kennt das BMP-Format nicht!

Ein Bild zu speichern ist unter FMX so einfach wie Luft holen

Delphi-Quellcode:

procedure TMainForm.TakePhotoFromCameraAction1DidFinishTaking( Image: TBitmap );
var
  LImageFilename: string;
begin
  // Zur Kontrolle in der Form anzeigen
  Image1.Bitmap := Image;
  // Dateiname basteln
  LImageFilename := TPath.Combine( TPath.GetSharedPicturesPath, FormatDateTime( '"img_"yyyymmddhhnnss".png"', Now ) );
  // Speichern
  Image.SaveToFile( LImageFilename );
  // Pfad in das Label schreiben
  Label1.Text := LImageFilename;
end;

Da ich SharedPicturesPath genommen habe und der Pfad mit

Code:

/storage/emulated/0/Pictures

(man beachte das emulated und informiert sich mal bei Google)
finde ich die Datei

• Android (Eigene Dateien App):
  Code:

  Gerätespeciher/Pictures

• Windows (Explorer):
  Code:

  <Gerät>\Tablet\Pictures

Warum? Weil dieser Pfad auch dann existiert, wenn keine externe Speicherkarte angeschlossen wurde. Darum steht im Pfad auch emulated!

Ach ja, und wenn das als JPEG abgespeichert werden soll, dann einfach

Delphi-Quellcode:

  // Dateiname basteln
  LImageFilename := TPath.Combine( TPath.GetSharedPicturesPath, FormatDateTime( '"img_"yyyymmddhhnnss".jpg"', Now ) );