// writes a TIFF using CCITT4 compression (make sure ImageEnView1.IEBitmap.PixelFormat=ie1g) with TIEWICWriter.Create do begin Open('D:\output.tif', ioTIFF); TIFFCompressionMethod := ieWICTiffCompressionCCITT4; PutFrame(ImageEnView1.IEBitmap); Free; end;