2005.06.21 09:17 "[Tiff] Tiff-Tags and Delphi7 / X and Y RESOLUTION / PHOTOMETRIC", by Matthias Lach
First i need to say a kind "THANK THEE" for helping me out with my newbie problems.
I solved the invertproblem with changing the PHOTOMETRIC_MINISWHITH into a MINISBLACK - what ever the problem was - i have a nice looking image now.
For some reason i like to implemetn a check box in my form, that - if ist check
change the PHOTOMETRIC-value.
So i put a sting "minis" with "PHOTOMETRIC_MINISWHITH" and used
TIFFSetField(tifbild, TIFFTAG_PHOTOMETRIC, minis);
BUT - that does not work. the outputfile as the value "unknown 26696" as Photometric.
I can use variables for the value "TIFFSetField(tifbild, TIFFTAG_IMAGEWIDTH, width)"
and it workes fine. why not for Photometric?
TIFFGetField(OpenTiff,TIFFTAG_XRESOLUTION,@FirstPageXReso) and TIFFGetField(OpenTiff,TIFFTAG_YRESOLUTION,@FirstPageYReso), put it in public variables of cardinal type.
i get x= 1129054208 and Y=1128529920 from
a file that is x=204 dpi and y= 196 dpi.
if i want to wirte back these values all i get back is ZERO "0" (opend with AsTiffTagViewer).
TIFFSetField(tifbild, TIFFTAG_XRESOLUTION, FirstPageXReso);
TIFFSetField(tifbild, TIFFTAG_YRESOLUTION, FirstPageYReso);
(same values as read from original file)
there must be a little error in reasoning on my side i guess... but..
Can Someone please point me into right direction?
thank thee all
Mit freundlichen Gruessen