| AWARE [SYSTEMS] | Imaging expertise for the Delphi developer | |||||||
![]() |
TIFF and LibTiff Mailing List Archive | |||||||
LibTiff Mailing List
TIFF and LibTiff Mailing List Archive Contact
The TIFF Mailing List Homepage |
Thread2004.12.29 09:39 "TR:", by Jamel Bel Hadj BrahimHow can I use FillOrder=Lsb2ToMsb, TIFFTAG_COMPRESSION = COMPRESSION_CCITTFAX4? Usually I obtain a black image. My code is : TIFFSetField(out, TIFFTAG_IMAGEWIDTH, XSIZE); TIFFSetField(out, TIFFTAG_IMAGELENGTH, YSIZE); TIFFSetField(out, TIFFTAG_BITSPERSAMPLE, 2); TIFFSetField(out, TIFFTAG_SAMPLESPERPIXEL, 1); TIFFSetField(out, TIFFTAG_ROWSPERSTRIP, YSIZE); TIFFSetField(out, TIFFTAG_SUBFILETYPE, 0); TIFFSetField(out, TIFFTAG_COMPRESSION, COMPRESSION_CCITTFAX4); TIFFSetField(out, TIFFTAG_GROUP4OPTIONS, 0); TIFFSetField(out, TIFFTAG_FAXMODE, FAXMODE_CLASSF); TIFFSetField(out, TIFFTAG_PHOTOMETRIC, PHOTOMETRIC_MINISWHITE); TIFFSetField(out, TIFFTAG_PLANARCONFIG, PLANARCONFIG_CONTIG); TIFFSetField(out, TIFFTAG_FILLORDER, FILLORDER_LSB2MSB); TIFFSetField(out, TIFFTAG_ORIENTATION, ORIENTATION_TOPLEFT); TIFFSetField(out, TIFFTAG_RESOLUTIONUNIT, RESUNIT_INCH); TIFFSetField(out, TIFFTAG_XRESOLUTION, 204.0); TIFFSetField(out, TIFFTAG_YRESOLUTION, 196.0); TIFFSetField(out, TIFFTAG_DATETIME, "2004:12:23 10:17:19"); TIFFSetField(out, TIFFTAG_SOFTWARE, "Jamel"); TIFFSetField(out, TIFFTAG_PAGENUMBER, 0, 1); TIFFWriteEncodedStrip(out, 0, buffer, XSIZE * YSIZE); TIFFWriteDirectory(out); |
|||||||