tmsuole2impl.hpp

TMS Component Pack V5.0包含了超过 280 个为 Delphi 以及 C++Builder 设计的 TMS 生产控件

// Borland C++ Builder
// Copyright (c) 1995, 2005 by Borland Software Corporation
// All rights reserved

// (DO NOT EDIT: machine generated header) 'Tmsuole2impl.pas' rev: 10.00

#ifndef Tmsuole2implHPP
#define Tmsuole2implHPP

#pragma delphiheader begin
#pragma option push
#pragma option -w-      // All warnings off
#pragma option -Vx      // Zero-length empty class member functions
#pragma pack(push,8)
#include <System.hpp>	// Pascal unit
#include <Sysinit.hpp>	// Pascal unit
#include <Classes.hpp>	// Pascal unit
#include <Tmsuflxmessages.hpp>	// Pascal unit
#include <Sysutils.hpp>	// Pascal unit
#include <Tmsxlsmessages.hpp>	// Pascal unit
#include <Contnrs.hpp>	// Pascal unit
#include <Tmsuxlsprotect.hpp>	// Pascal unit

//-- user supplied -----------------------------------------------------------

namespace Tmsuole2impl
{
//-- type declarations -------------------------------------------------------
#pragma option push -b-
enum STGTY { STGTY_INVALID, STGTY_STORAGE, STGTY_STREAM, STGTY_LOCKBYTES, STGTY_PROPERTY, STGTY_ROOT };
#pragma option pop

#pragma option push -b-
enum DECOLOR { DECOLOR_RED, DECOLOR_BLACK };
#pragma option pop

class DELPHICLASS UInt32List;
class PASCALIMPLEMENTATION UInt32List : public System::TObject 
{
	typedef System::TObject inherited;
	
public:
	unsigned operator[](int i) { return Items[i]; }
	
private:
	Classes::TList* FList;
	unsigned __fastcall GetItems(const int i);
	void __fastcall SetItems(const int i, const unsigned Value);
	int __fastcall GetCapacity(void);
	void __fastcall SetCapacity(const int Value);
	int __fastcall GetCount(void);
	
protected:
	__property int Capacity = {read=GetCapacity, write=SetCapacity, nodefault};
	
public:
	__fastcall UInt32List(void);
	__fastcall virtual ~UInt32List(void);
	__property unsigned Items[int i] = {read=GetItems, write=SetItems/*, default*/};
	void __fastcall Add(const unsigned Item);
	__property int Count = {read=GetCount, nodefault};
};


class DELPHICLASS TOneDirEntry;
class PASCALIMPLEMENTATION TOneDirEntry : public System::TObject 
{
	typedef System::TObject inherited;
	
public:
	WideString Name;
	int LeftSid;
	int RightSid;
	int ChildSid;
	bool Deleted;
	DECOLOR Color;
	__fastcall TOneDirEntry(const WideString aName, const int aLeftSid, const int aRightSid, const int aChildSid, const DECOLOR aColor);
public:
	#pragma option push -w-inl
	/* TObject.Destroy */ inline __fastcall virtual ~TOneDirEntry(void) { }
	#pragma option pop
	
};


class DELPHICLASS TDirEntryList;
class PASCALIMPLEMENTATION TDirEntryList : public System::TObject 
{
	typedef System::TObject inherited;
	
public:
	TOneDirEntry* operator[](int i) { return Items[i]; }
	
private:
	Contnrs::TObjectList* FList;
	TOneDirEntry* __fastcall GetItems(const int i);
	void __fastcall SetItems(const int i, const TOneDirEntry* Value);
	int __fastcall GetCount(void);
	
public:
	__fastcall TDirEntryList(void);
	__fastcall virtual ~TDirEntryList(void);
	__property TOneDirEntry* Items[int i] = {read=GetItems, write=SetItems/*, default*/};
	void __fastcall Add(const TOneDirEntry* Item);
	__property int Count = {read=GetCount, nodefault};
};


typedef DynamicArray<WideString >  StringArray;

class DELPHICLASS TOle2Header;
class PASCALIMPLEMENTATION TOle2Header : public System::TObject 
{
	typedef System::TObject inherited;
	
private:
	DynamicArray<Byte >  FileSignature;
	/*         class method */ static bool __fastcall CompareArray(TMetaClass* vmt, const Tmsuflxmessages::ByteArray a1, const Tmsuflxmessages::ByteArray a2, const int length);
	int __fastcall Get_FuSectorShift(void);
	unsigned __fastcall Get_FSectorSize(void);
	int __fastcall Get_uMiniSectorShift(void);
	unsigned __fastcall Get_MiniSectorSize(void);
	unsigned __fastcall Get_csectFat(void);
	void __fastcall Set_csectFat(const unsigned value);
	unsigned __fastcall Get_sectDirStart(void);
	void __fastcall Set_sectDirStart(const unsigned value);
	unsigned __fastcall Get_FulMiniSectorCutoff(void);
	unsigned __fastcall Get_sectMiniFatStart(void);
	void __fastcall Set_sectMiniFatStart(const unsigned value);
	unsigned __fastcall Get_csectMiniFat(void);
	void __fastcall Set_csectMiniFat(const unsigned value);
	unsigned __fastcall Get_sectDifStart(void);
	void __fastcall Set_sectDifStart(const unsigned value);
	unsigned __fastcall Get_csectDif(void);
	void __fastcall Set_csectDif(const unsigned value);
	__property int FuSectorShift = {read=Get_FuSectorShift, nodefault};
	__property unsigned FSectorSize = {read=Get_FSectorSize, nodefault};
	
public:
	bool NotXls97;
	DynamicArray<Byte >  Data;
	__int64 StartOfs;
	unsigned SectorSize;
	int uSectorShift;
	unsigned ulMiniSectorCutoff;
	__fastcall TOle2Header(const Classes::TStream* aStream, const bool AvoidExceptions);
	void __fastcall Save(const Classes::TStream* aStream);
	int __fastcall uDIFEntryShift(void);
	__int64 __fastcall SectToStPos(const __int64 Sect)/* overload */;
	__int64 __fastcall SectToStPos(const __int64 Sect, const __int64 Ofs)/* overload */;
	__property int uMiniSectorShift = {read=Get_uMiniSectorShift, nodefault};
	__property unsigned MiniSectorSize = {read=Get_MiniSectorSize, nodefault};
	__property unsigned csectFat = {read=Get_csectFat, write=Set_csectFat, nodefault};
	__property unsigned sectDirStart = {read=Get_sectDirStart, write=Set_sectDirStart, nodefault};
	__property unsigned FulMiniSectorCutoff = {read=Get_FulMiniSectorCutoff, nodefault};
	__property unsigned sectMiniFatStart = {read=Get_sectMiniFatStart, write=Set_sectMiniFatStart, nodefault};
	__property unsigned csectMiniFat = {read=Get_csectMiniFat, write=Set_csectMiniFat, nodefault};
	__property unsigned sectDifStart = {read=Get_sectDifStart, write=Set_sectDifStart, nodefault};
	__property unsigned csectDif = {read=Get_csectDif, write=Set_csectDif, nodefault};
public:
	#pragma option push -w-inl
	/* TObject.Destroy */ inline __fastcall virtual ~TOle2Header(void) { }
	#pragma option pop
	
};


class DELPHICLASS TOle2FAT;
class PASCALIMPLEMENTATION TOle2FAT : public UInt32List 
{
	typedef UInt32List inherited;
	
private:
	TOle2Header* Header;
	__int64 LastFindSectorOfs;
	__int64 LastFindSectorStart;
	__int64 LastFindSectorRes;
	__fastcall TOle2FAT(void)/* overload */;
	void __fastcall LoadDifSector(const Tmsuflxmessages::ByteArray data, const unsigned inipos, const unsigned endpos, const Classes::TStream* aStream);
	void __fastcall LoadFatSector(const Tmsuflxmessages::ByteArray data);