Android, ein Bitmap speichern geht ncht

[Kostas]

Zitat von mkinzler:

Kann die FMX-Bitmap-Klasse von sich aus.

ich habe jetzt direkt keine Klasse für PNG gefunden. Ober meinst du die Sache mit TBitmapCodecManager?

[mkinzler]

Der Codec wird anhand der Endung erkannt.

[Sir Rufo]

Du musst einfach nur speichern, anhand der Datei-Erweiterung wird automatisch das passende Format gewählt.

[Kostas]

Hallo zusammen,

das Problem vorab, ich finde die Datei nicht.

irgendwie spreche ich nicht Android, ich sollte es mal mit klingonisch vesuchen.

Testhalber habe ich ein TMemo in ein File geschrieben. Ich kann auch das File lesen,
doch finden kann ich es nicht.

Delphi-Quellcode:

  aMemoFile := TPath.GetSharedDocumentsPath + TPath.DirectorySeparatorChar + 'Memo.txt';
  Memo1.Lines.add(aMemoFile);
  Memo1.Lines.SaveToFile(aMemoFile);

Dem Samsung Tab habe ich eine SD-Card verpasst.
Als Speicherort wird ausgegeben:
/storage/emulated/0/Adroid/data/com.embarcadero.PngProblem/files/Memo.txt

Ich suche nun nach Memo.txt über den Datamanager vom Tab auf "SD Card" und finde nichts.
Ebenso wenig über den Windows Dateiexplorer. Kann es sein das die Files hiden sind?
Auch im Gerätespeicher ist nichts zu finden. Die Memo.txt wird jedoch geladen mit Memo1.Lines.LoadFromFile(aMemoFile); Warum kann ich die Datei nicht finden?

Bezüglich bmp als png speichern, sicht es etwas anders aus. Ich bekomme beim speichern keine Fehlermeldung.
Doch die Datei kann geladen werden jedoch kann sie nicht gefunden wird.

Delphi-Quellcode:

    
  aImageFile := TPath.GetSharedDocumentsPath + TPath.DirectorySeparatorChar + 'image.png';
  ImageViewer1.Bitmap := bmp; //Image wird angezeigt.
  bmp.SaveToFile(aImageFile); //keine Fehlermeldung.

  if FileExists(aImageFile)then //Image wird nicht gefunden
  begin
    ImageViewer2.Bitmap.LoadFromFile(aImageFile);
  end;

Hat jemand eine Idee?
Gruß Kostas

[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 ) );

[Kostas]

oh je, wahrscheinlich hat es immer funktioniert. Es ist nur ein komisches Verhalten.

Wenn der Ordner leer ist und ich erstelle über die App ein File, wird das File im Windows-Explorer nicht
angezeigt auch nicht bei F5 und auch nicht wenn ich den Explorer neu starte. Kopiere ich jedoch irgendeine
Datei in \Tablet\Pictures erscheinen danach auch die Files die ich per App erstellt habe. Danach funktioniert auch das aktualisieren mit F5 sofort. Ich schreibe auch in den gleichen Path \Tablet\Pictures
den Inhalt eines Memo in ein Textfile. Das gleiche Verhalten.

Im Dateimanager vom Tab werden die Files sofort angezeigt.

Zum Thema Image als png anlegen.
Das funktioniert auch einwandfrei.
Wenn ich das File direkt lade etwa so:
ImageViewer2.Bitmap.LoadFromFile(atmpImageFile); funktioniert es nicht.

Aber so funktioniert es:

Delphi-Quellcode:

  bmp:=FMX.Graphics.TBitmap.Create;
  bmp.LoadFromFile(atmpImageFile);
  ImageViewer2.Bitmap := bmp;

[himitsu]

Zitat von Kostas:

Delphi-Quellcode:

  aMemoFile := TPath.GetSharedDocumentsPath + TPath.DirectorySeparatorChar + 'Memo.txt';
  Memo1.Lines.add(aMemoFile);
  Memo1.Lines.SaveToFile(aMemoFile);

Dem Samsung Tab habe ich eine SD-Card verpasst.
Als Speicherort wird ausgegeben:
/storage/emulated/0/Adroid/data/com.embarcadero.PngProblem/files/Memo.txt

Ich suche nun nach Memo.txt über den Datamanager vom Tab auf "SD Card" und finde nichts.
...

Zitat von MEissing:

Siehe Googles:
Die verbieten seit Android 4.4.2 das direkte Schreiben auf die SD Karte....

aus http://www.delphipraxis.net/182322-f...ml#post1276401

[Kostas]

Danke wieder einmal himitzu,
wieder ein Puzzle weiter.

Dir noch eine schöne Zeit.