ImageEn for Delphi and C++ Builder ImageEn for Delphi and C++ Builder

 

ImageEn Forum
Profile    Join    Active Topics    Forum FAQ    Search this forumSearch
 All Forums
 ImageEn Library for Delphi, C++ and .Net
 ImageEn and IEvolution Support Forum
 InjectJpegEXIF

Note: You must be registered in order to post a reply.
To register, click here. Registration is FREE!

View 
UserName:
Password:
Format  Bold Italicized Underline  Align Left Centered Align Right  Horizontal Rule  Insert Hyperlink   Browse for an image to attach to your post Browse for a zip to attach to your post Insert Code  Insert Quote Insert List
   
Message 

 

Emoji
Smile [:)] Big Smile [:D] Cool [8D] Blush [:I]
Tongue [:P] Evil [):] Wink [;)] Black Eye [B)]
Frown [:(] Shocked [:0] Angry [:(!] Sleepy [|)]
Kisses [:X] Approve [^] Disapprove [V] Question [?]

 
Check here to subscribe to this topic.
   

T O P I C    R E V I E W
arkipix Posted - Aug 23 2012 : 00:39:06
These lines did work until...

DateSeparator := ':';
ShortDateFormat :='YYYY:MM:DD';
ImageEnV1 := TImageEnView.Create(Self);
...
Exif_DateTimeOriginal := DateTimetoStr(Date);//'2010:01:01 01:01:00';
EX := ImageEnV1.io.InjectJpegEXIF(BilledNavn);
The result is:
DateTimeOriginal: Saturday, 30. December, 1899 * 12:00:00 AM
DateTimeDigitized: Tuesday, 21. August, 2012 * 12:30:36 PM
Not a correction af 6 hours back. EX is true.
I use it for correction of wrong cameratime.
Why?
Regards
Peter
4   L A T E S T    R E P L I E S    (Newest First)
xequte Posted - Aug 27 2012 : 03:11:56
Note: DateTimeToEXIFDate() is no longer required.

Just use:

EXIF_DateTimeOriginal2 := value;



Nigel
Xequte Software
www.xequte.com
nigel@xequte.com
xequte Posted - Aug 26 2012 : 02:30:39
Hi Peter

Please display the value of EXIF_DateTimeOriginal after setting it and after loading it, i.e.:

EXIF_DateTimeOriginal := DateTimeToEXIFDate(NewDate);
ShowMessage(EXIF_DateTimeOriginal);
EX := ImageEnV1.io.InjectJpegEXIF(BilledNavn);

Load the image again using your normal method then call:
ShowMessage(EXIF_DateTimeOriginal);


What are the values at these points?

Nigel
Xequte Software
www.xequte.com
nigel@xequte.com
arkipix Posted - Aug 25 2012 : 01:05:07
Sorry Nigel
No change, same result.
Regards
Peter
xequte Posted - Aug 23 2012 : 02:07:56
Hi Peter

Rather than use that date method can you try:

EXIF_DateTimeOriginal := DateTimeToEXIFDate(StrToDateTime(value));

DateTimeToEXIFDate() is defined in iexEXIFRoutines.pas

Nigel
Xequte Software
www.xequte.com
nigel@xequte.com