Class TTifIFD

Unit

xomTif

Declaration

type TTifIFD = class(TXOMObject)

Description

TTifIFD

Hierarchy

• TXOMObject
• TTifIFD

Overview

Methods

	procedure AfterConstruction; override;
	procedure BeforeDestruction; override;
	procedure Assign (ASource: TObject); override;
	procedure SaveToStream (ATif: TTif; AStream: TStream; var AOffset: Int64; var ANextOffset: Int64; const AOrder: TTifByteOrder; const AHeaderOffset: Int64 = 0; AMakerNotesIFD: TTifIFD = nil; const ADataOffset: Int64 = 0; AWithTifStrips: Boolean = False); reintroduce;
	function ParseFromStream (const AFileName: WideString; AStream: TStream; AOrder: TTifByteOrder; const AWithSubIFDs: Boolean; const AStreamOffset: Int64; const AQuick: Boolean = False; ADataStream: TStream = nil; const AFullDng: Boolean = False; const ADataSizeLimit: Integer = -1; const AReferenced: Boolean = False; AReadSpecificTags: TTifTags = nil): Cardinal;
	procedure PrepareTifStrips (const AFileName: WideString; var AData: TTifStripData);
	procedure UnPrepareTifStrips;
	function FindTag (const ATagNumber: Integer): TTifTag;
	function FindValue (const AValue: WideString): TTifTag;
	function TagValue (const ATagNr: Integer): WideString;
	function TotalTagDataSize: Int64;
	function ContainsBaselineJPG: Boolean;
	function ContainsRGB: Boolean;

Properties

	property ThumbStream: TDataMemoryStream read FThumbStream;
	property TifStripData: TTifTags read FTifStripData write FTifStripData;
	property Tif: TTif read FTif;
	property EnumTable: TTagTableEnum read FEnumTable;
	property Tags: TTifTags read FTags write FTags;
	property IFDType: WideString read FIFDType write FIFDType;
	property IFDByteOrder: TTifByteOrder read FIFDByteOrder write FIFDByteOrder;
	property CameraMake: WideString read FCameraMake write FCameraMake;
	property SubIFDs: TTifIFDs read FSubIFDs write FSubIFDs;
	property ImageDataType: TTifImageDataType read FImageDataType write FImageDataType;

Description

Methods

	procedure AfterConstruction; override;

	procedure BeforeDestruction; override;

	procedure Assign (ASource: TObject); override;

	procedure SaveToStream (ATif: TTif; AStream: TStream; var AOffset: Int64; var ANextOffset: Int64; const AOrder: TTifByteOrder; const AHeaderOffset: Int64 = 0; AMakerNotesIFD: TTifIFD = nil; const ADataOffset: Int64 = 0; AWithTifStrips: Boolean = False); reintroduce;

	function ParseFromStream (const AFileName: WideString; AStream: TStream; AOrder: TTifByteOrder; const AWithSubIFDs: Boolean; const AStreamOffset: Int64; const AQuick: Boolean = False; ADataStream: TStream = nil; const AFullDng: Boolean = False; const ADataSizeLimit: Integer = -1; const AReferenced: Boolean = False; AReadSpecificTags: TTifTags = nil): Cardinal;

	procedure PrepareTifStrips (const AFileName: WideString; var AData: TTifStripData);

	procedure UnPrepareTifStrips;

	function FindTag (const ATagNumber: Integer): TTifTag;

	function FindValue (const AValue: WideString): TTifTag;

	function TagValue (const ATagNr: Integer): WideString;

	function TotalTagDataSize: Int64;

	function ContainsBaselineJPG: Boolean;

	function ContainsRGB: Boolean;

Properties

	property ThumbStream: TDataMemoryStream read FThumbStream;

	property TifStripData: TTifTags read FTifStripData write FTifStripData;

	property Tif: TTif read FTif;

	property EnumTable: TTagTableEnum read FEnumTable;

	property Tags: TTifTags read FTags write FTags;

	property IFDType: WideString read FIFDType write FIFDType;

	property IFDByteOrder: TTifByteOrder read FIFDByteOrder write FIFDByteOrder;

	property CameraMake: WideString read FCameraMake write FCameraMake;

	property SubIFDs: TTifIFDs read FSubIFDs write FSubIFDs;

	property ImageDataType: TTifImageDataType read FImageDataType write FImageDataType;