Forum: Win32/Win64 API (native code)
Delphi
by Benmik,
20. Dez 2017
OK, ich verstehe.
Ich brauche UTF8ToAnsi nicht, arbeite allerdings mit Windows 7.
Kann das innerhalb von Delphi eine Änderung verursachen?
Forum: Win32/Win64 API (native code)
Delphi
by Benmik,
20. Dez 2017
Willie, ich bin mir mittlerweile nicht mehr sicher, ob wir uns richtig verstehen.
ETCmd1 schreibt überhaupt erstmal "Köln" in das Tag "City". Wenn du das für "nicht notwendig" hältst, dann hast du was übersehen.
ETCmd2 liest die Tags aus der Datei in Delphi aus; da passiert äußerlich natürlich erstmal nichts, aber du hast die Möglichkeit, die Tags in AusgabeListe auszulesen.
ETCmd3 ist durch...
Forum: Win32/Win64 API (native code)
Delphi
by Benmik,
19. Dez 2017
procedure FühreTestCodeAus;
var ETool,ETCmd1,ETCmd2,ETCmd3,Datname:string; AusgabeListe,FehlerListe:TStringList;
begin
AusgabeListe := TStringList.Create;
FehlerListe := TStringList.Create;
ETool := 'C:\Program Files (x86)\EXIFTool\exiftool.exe ';
ETCmd1 := ' -charset IPTC=UTF8 -city=Köln -lang de ';
ETCmd2 := ' -k -a -u -g1 -lang de -charset IPTC=UTF8 ';
...
Forum: Win32/Win64 API (native code)
Delphi
by Benmik,
19. Dez 2017
Naja, wenn es bei mir funktioniert, dann muss es bei dir wohl auch funktionieren. Aber du hast ja eine Lösung gefunden, die dich zufriedenstellt.
Würde mich freuen, wenn du uns weiter auf dem Laufenden hältst.
Forum: Win32/Win64 API (native code)
Delphi
by Benmik,
18. Dez 2017
In dem von dir angehängten Bild finde ich nicht die Informationen, die du ausgelesen hast. Kannst du mal das Original einstellen oder zumindest eins, in dem alle Informationen erhalten geblieben sind?
PS: Ich denke mal, ich habe die Lösung gefunden, und zwar hier. Beachte mal "Reply #9". Obwohl "UTF8" standardmäßig eingestellt sein soll, muss es mit angegeben werden.
Probiere mal folgende...
Forum: Win32/Win64 API (native code)
Delphi
by Benmik,
15. Dez 2017
Ich würde mich freuen, wenn du später hier mal deine Erfahrungen mitteilen würdest, insbesondere, welche Kommandos und Schalter du eingesetzt und getestet hast.
Forum: Win32/Win64 API (native code)
Delphi
by Benmik,
12. Dez 2017
Vielleicht hast du meine Antwort übersehen (#16).
Forum: Win32/Win64 API (native code)
Delphi
by Benmik,
12. Dez 2017
Nein, dafür gibt es bei EXIFTools einen eigenen Schalter. Die Erläuterung hierzu hat er ja auch als Datei beigefügt.
Forum: Win32/Win64 API (native code)
Delphi
by Benmik,
12. Dez 2017
EXIF Tool ist auch für mich ein extrem interessantes Programm. Nur der Weg über diese temporären Dateien stört mich enorm.
Geht eigentlich nicht der Weg über eine pipe? Auf Harveys Seite gibt es einen Link zu VB-Beispiel-Code, der das über CreatePipe macht. Siehe vielleicht auch diese Beiträge hier.
PS: Bin ja doof, ich sehe eben, die Umsetzung schlummert schon längst auf meiner Festplatte......
