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
 Additional 5.0.6 issues

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
John Posted - Mar 05 2014 : 11:45:11
I also recently upgraded from 5.0.5 to 5.0.6 and starting receiving reports from users regarding EXIF data irregularities.

In investigating, the attached image is of a showmessage dialog which returns the correct values in 5.0.5 and no values or incorrect values in 5.0.6. The code for the showmessage is found below the image.




tempDateString := Copy(String(ImageEnView1.IO.Params.EXIF_DateTimeOriginal), 1, 10);
tempTimeString := DateTimeToStr(ImageEnView1.IO.Params.EXIF_DateTime2);

tempSpaceLocation := 0;
for I := 1 to Length(tempTimeString) do
begin
if (tempTimeString[I] = ' ') and (tempSpaceLocation = 0) then
begin
tempSpaceLocation := I;
end;
end;
tempTimeString := Copy(tempTimeString, tempSpaceLocation + 1, Length(tempTimeString) - tempSpaceLocation);

showmessage(
'Copy(String(EXIF_DateTimeOriginal = ' + tempDateString + #13 +
'Ansi DateTimeOriginal = ' + ImageEnView1.IO.Params.EXIF_DateTimeOriginal + #13 +
'AnsiStringToStringAsIs DateTimeOriginal = ' + AnsiStringToStringAsIs(ImageEnView1.IO.Params.EXIF_DateTimeOriginal) + #13 +
'DateToStr(Exif_DateTime2 = ' + DateToStr(ImageEnView1.IO.Params.EXIF_DateTime2) + #13 +
'TimeToStr using Exif_DateTime2 = ' + tempTimeString + #13 +
'DateToStr(Exif_DateTimeOriginal2 = ' + DateToStr(ImageEnView1.IO.Params.EXIF_DateTimeOriginal2) + #13 +
'DateToStr(Exif_DateTimeDigitized2 = ' + DatetoStr(ImageenView1.IO.Params.EXIF_DateTimeDigitized2));


TIA

John
3   L A T E S T    R E P L I E S    (Newest First)
xequte Posted - Mar 13 2014 : 15:45:14
Hi JR

Email me if you want to confirm. I will forward the source.



Nigel
Xequte Software
www.xequte.com
nigel@xequte.com
jrpcguru Posted - Mar 13 2014 : 11:03:05
I too have just discovered that 5.0.6 completely fails in reading EXIF, IPTC, and GPS data. I have two programs, one compiled in Delphi 7 and one in XE2. Versions compiled with 5.0.5 successfully read Exif. Those compiled in 5.0.6 fail. I have just uninstalled, rebooted, reinstalled 5.0.6 with the same result. I then uninstalled, rebooted, and reinstalled 5.0.5 and the programs now compile and show Exif properly.

I sure hope this is what you have already found and fixed!

J.R.
fab Posted - Mar 05 2014 : 12:40:27
Thank you, it has been fixed now.