Forum: Sonstige Fragen zu Delphi
Delphi
by Woodman,
31. Mai 2019
Hallo Dalai,
vielen Dank für den Tipp. Dafür habe ich mir IrfanView mal installiert.
So sieht eine Datei (unbearbeitet) vom Scanner aus:
Man sieht: Keine Exif-Daten, IPTC-Daten sind leer und nur der Comment ist belegt:
Hier hat das Scann-Programm seine Spuren hinterlassen. Ich bearbeite das Bild dann mit einem Programm von mir, mit dem ich zusätzliche Infos sowohl in die Exif- als auch in...
Forum: Sonstige Fragen zu Delphi
Delphi
by Woodman,
30. Mai 2019
Also, ich habe ein wenig "gespielt" und glaube jetzt die Lösung gefunden zu haben für den Wert von "Datum":
Wenn keine Exif-Daten vorhanden sind:
=> Datum = Änderungsdatum
Wenn Exif-Daten und Aufnahmedatum vorhanden:
=> Datum = Aufnahmedatum
Wenn Exif-Daten vorhanden aber kein Aufnahmedatum aber ein Digitalisierungsdatum vorhanden:
=> Datum = Digitalisierungsdatum
Forum: Sonstige Fragen zu Delphi
Delphi
by Woodman,
30. Mai 2019
Nur kurz zur Erklärung, warum das Änderungsdatum vor dem Erstelldatum liegt (Das kann auch jeder selber testen): Die Dateien aus dem Screendump habe vom Original "Enstehungsort" in ein anderes Verzeichnis kopiert. Das kann man auch daran erkennen, das "Erstelldatum" und "letzter Zugriff" bei allen Dateien identisch ist aber unter "Datum" ist noch das Original-Erstelldatum zu erkennen.
Forum: Sonstige Fragen zu Delphi
Delphi
by Woodman,
30. Mai 2019
Hallo Leute,
vielen Dank für Eure Beiträge. Ich glaube, ich muss das mal in einem Microsoft-Forum anfragen.
Tatsächlich sind in den JPEGs keine Exif-Infos drin. Es gibt zwar diverse andere Infos drin. XnView zeigt mir z.B. diese Datei-Eigenschaften an:
Da stehen tatsächlich auch drin, welche Software den Scan durchgeführt hat - aber eben nicht als Exif und auch nicht als IPTC.
Auch bei...
Forum: Sonstige Fragen zu Delphi
Delphi
by Woodman,
29. Mai 2019
Ähm, also von links nach rechts:
Datum, Erstelldatum, Änderungsdatum und Letzter Zugriff
Forum: Sonstige Fragen zu Delphi
Delphi
by Woodman,
29. Mai 2019
Vielen Dank, das funktioniert... Ist aber leider nicht das was ich gesucht habe. S.o.
Tatsächlich gibt Deine Routine das gleiche zurück wie SysUtils.FileAge(Filename), also das Änderungsdatum.
Forum: Sonstige Fragen zu Delphi
Delphi
by Woodman,
29. Mai 2019
Nee, leider nicht. Die Dateien sind - wie ich oben schon angedeutet habe - die Ergebnisse eines Dia-Scanners. Und der schreibt leider keine Exifdaten rein. Das ist aber genau das, was ich machen möchte.
Forum: Sonstige Fragen zu Delphi
Delphi
by Woodman,
29. Mai 2019
Hallo Wissende,
tja, die Frage ist sicher schon hundertmal beantwortet worden, aber für mein Problem habe ich noch keine Lösung gefunden.
Folgendes: Bekannt ist mir diese Routine:
// Hier gefunden: https://www.delphipraxis.net/6594-letzten-zugriff-auf-datei-auslesen.html
function GetFileTimes(const FileName: string; var Created: TDateTime;
var Accessed: TDateTime; var Modified: TDateTime):...