Source position: fpreadtiff.pas line 63
type TTiffCreateCompatibleImgEvent = procedure(
Sender: TFPReaderTiff;
ImgFileDir: TTiffIFD
) of object;