Hallo,
ich versuche gerade mit Hilfe von Dexif (
mcguirez.homestead.com/downloads.html) Kommentare aus JPEG-Bildern auszulesen. Auch versuche ich Kommentare damit zu schreiben. Funktioiert beides nicht. Hier mein Code:
Für das Auslesen:
Delphi-Quelltext
1: 2: 3: 4:
| PicData:=TImgData.Create; PicData.BuildList:=GenAll; PicData.ProcessFile(ParamStr(1)); RE_Comment.Text:=StringReplace(PicData.GetCommentSegment,'\break',#13#10,[rfReplaceAll]); |
und zum schreiben:
Delphi-Quelltext
1:
| PicData.MakeCommentSegment(StringReplace(RE_Notiz.Text,#13#10,'\break',[rfReplaceAll])); |
Ich hoffe Ihr könnt helfen, denn die Hilfe von DExif hat selbst so manchen Fehler...
Schon mal Danke,
Mann aus Delphi