www.pudn.com > PtOpenGuiSourceCode.zip > IFD_Module.hpp

// Borland C++ Builder 
// Copyright (c) 1995, 1999 by Borland International 
// All rights reserved 
 
// (DO NOT EDIT: machine generated header) 'IFD_Module.pas' rev: 4.00 
 
#ifndef IFD_ModuleHPP 
#define IFD_ModuleHPP 
 
#pragma delphiheader begin 
#pragma option push -w- 
#include 	// Pascal unit 
#include 	// Pascal unit 
#include 	// Pascal unit 
#include 	// Pascal unit 
#include 	// Pascal unit 
#include 	// Pascal unit 
 
//-- user supplied ----------------------------------------------------------- 
 
namespace Ifd_module 
{ 
//-- type declarations ------------------------------------------------------- 
#pragma pack(push, 4) 
struct TTag 
{ 
	Word TagType; 
	Word DataType; 
	unsigned DataLength; 
	unsigned DataOrPointer; 
} ; 
#pragma pack(pop) 
 
typedef TTag TTagSet[1]; 
 
typedef TTag *PTagSet; 
 
typedef unsigned TOffSets[1]; 
 
typedef unsigned *POffsets; 
 
typedef unsigned *PByteCounts; 
 
class DELPHICLASS TIFD; 
#pragma pack(push, 4) 
class PASCALIMPLEMENTATION TIFD : public System::TObject  
{ 
	typedef System::TObject inherited; 
	 
private: 
	void *VirtualPalette; 
	bool PaletteCreated; 
	unsigned PaletteVolume; 
	void * __pascal IncAddress(void * Addr, int Shift); 
	Word __fastcall TagType(Word TagIndex); 
	unsigned __fastcall TagData(Word TagIndex); 
	unsigned __fastcall TagPointer(Word TagIndex); 
	Word __fastcall DataType(Word TagIndex); 
	unsigned __fastcall DataFieldLength(Byte TagIndex); 
	Byte __fastcall GetTagIndex(Word TagCode); 
	Word __fastcall GetStripeCount(void); 
	 
public: 
	void *FileHead; 
	TTag *PTags; 
	Word TagCount; 
	unsigned NextIFD; 
	Word Width; 
	Word Lenght; 
	Word BitsPerSample; 
	Word BitsPerPixel; 
	unsigned StripOffSet; 
	Word Compression; 
	Word StripeCount; 
	Word RowsPerStrip; 
	Word SamplesPerPixel; 
	Byte DataPointerSize; 
	Byte FillOrder; 
	Byte Orientation; 
	Word PlanarConfiguration; 
	unsigned ColorMap; 
	unsigned StripeByteCounts; 
	Byte PhotometricInterpretation; 
	Byte CompBits; 
	unsigned *OffSets; 
	unsigned *ByteCounts; 
	bool Prediction; 
	Byte __fastcall GetColor(Word ClrInd, Byte RGBFlag); 
	void __fastcall ReadInit(void * VirtFile, int Shift); 
	__fastcall TIFD(void * VirtFile, int Shift); 
	void __fastcall WriteInit(Graphics::TBitmap* Source, bool Compressing); 
	__fastcall TIFD(Graphics::TBitmap* Source, bool Compressing); 
	void __fastcall InitFromStream(Classes::TStream* inStream); 
	void __fastcall InitFromFile(unsigned hFile); 
	__fastcall TIFD(unsigned hFile); 
	__fastcall TIFD(Classes::TStream* inStream); 
	__fastcall virtual ~TIFD(void); 
public: 
	#pragma option push -w-inl 
	/* TObject.Create */ inline __fastcall TIFD(void) : System::TObject() { } 
	#pragma option pop 
	 
}; 
 
#pragma pack(pop) 
 
//-- var, const, procedure --------------------------------------------------- 
 
}	/* namespace Ifd_module */ 
#if !defined(NO_IMPLICIT_NAMESPACE_USE) 
using namespace Ifd_module; 
#endif 
#pragma option pop	// -w- 
 
#pragma delphiheader end. 
//-- end unit ---------------------------------------------------------------- 
#endif	// IFD_Module