Kamerabild mit EXIF-Daten?

[sko1]

Hallo,

in einer Android-App nehme ich ein Foto über eine Standard-Action auf:

Delphi-Quellcode:

TakePhotoFromCameraAction1DidFinishTaking

Das funktioniert auch und praktisch ist, dass dabei auch die Maximalgrößen des Bildes vorgegeben werden können.

Absoluter Minuspunkt der Geschichte: da wird nur ein TImage zurückgegeben, welches keinerlei Exif-Informationen enthält und damit das abgespeicherte Bild auch nicht :-(

Welchen Weg gibt es, ein Kamerabild mit Exif-Infos aufzunehmen, ggf. zu verkleinern und dann abzuspeichern?

Ciao
Stefan

[KodeZwerg]

Verfolge mal diesen Link. Wenn der doof ist probiere diesen hier.

[timog]

Wir nutzen die von KodeZwerg verlinkte CCR-Exif von Chris Rolliston in einer Android FMX App genau für den von Dir genannten Anwendungsfall. Siehe zur CCR-Exif Unit auch diesen Post.

Kommen mit der Unit für die üblichen Tags (GPS, Datum) gut auf der mobilen Platform klar; die GPS-Sensor-Komponente muss für GPS halt Werte liefern. Ich weiß ohne in den Code zu schauen nicht, ob man die Sensorwerte noch umrechnen musste oder ob es überladene Methoden zum Speichern der Dezimalen Geokoordinaten von GPS gab.

Noch ein Tipp: Das Kleinrechnen des Bildes und Speichern hat bei uns auf schwacher Android Hardware manchmal zum Absturz der App geführt (bzw. einem schwarzen Bildschirm nach/beim Verlassen der Kamera geführt). Ein TTask hat hier bei der Lösung geholfen.

[KodeZwerg]

Ich habe da mal ein wenig herumgestöbert, für FMX ist es wohl wichtig gewisse von Delphi versteckte String Typen zu reaktivieren damit es mit CCR-Exif klappt.
Hier kann man sich dazu was durchlesen. Ich weiß leider nicht wie es um Delphi Tokyo 10.2.3 gestellt ist, ob man das überhaupt braucht, da bin ich total überfragt.
Leider gibt es diese gepatchten Dateien nur bis Delphi 10.1 Berlin, hätte da eventuell jemand was für's aktuelle Tokyo?