AWARE [SYSTEMS] Imaging expertise for the Delphi developer
AWare Systems, Imaging expertise for the Delphi developer, Home TIFF and LibTiff Mailing List Archive

LibTiff Mailing List

TIFF and LibTiff Mailing List Archive
September 2007

Previous Thread
Next Thread

Previous by Thread
Next by Thread

Previous by Date
Next by Date

Contact

The TIFF Mailing List Homepage
This list is run by Frank Warmerdam
Archive maintained by AWare Systems



Valid HTML 4.01!



Thread

2007.09.20 07:37 "Writing EXIF metadata", by Andrea Galligani
2007.09.24 16:28 "Writing EXIF metadata", by Phil Harvey

2007.09.24 16:28 "Writing EXIF metadata", by Phil Harvey

On 20-Sep-07, at 12:03 PM, Andrea Galligani wrote:
> I'm looking for a sample code that writes a tiff with the EXIF  
> metadata
> inside.
> Can you help me?

I haven't seen a response to this question yet, and I don't have any  
libtiff sample code that will do this, but adding EXIF information to  
a TIFF image is easy using the Image::ExifTool Perl library.  For  
example, to add XResolution, YResolution and ResolutionUnit:

use Image::ExifTool;
my $exifTool = new Image::ExifTool;
$exifTool->SetNewValue('EXIF:XResolution', 300);
$exifTool->SetNewValue('EXIF:YResolution', 300);
$exifTool->SetNewValue('EXIF:ResolutionUnit', 'inch');
$exifTool->WriteInfo('image.tiff');

- Phil