// Borland C++ Builder
// Copyright (c) 1995, 1999 by Borland International
// All rights reserved

// (DO NOT EDIT: machine generated header) 'OObjects.pas' rev: 5.00

#ifndef OObjectsHPP
#define OObjectsHPP

#pragma delphiheader begin
#pragma option push -w-
#pragma option push -Vx
#include <Classes.hpp>	// Pascal unit
#include <SysInit.hpp>	// Pascal unit
#include <System.hpp>	// Pascal unit

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

namespace Oobjects
{
//-- type declarations -------------------------------------------------------
class DELPHICLASS TOCollection;
class PASCALIMPLEMENTATION TOCollection : public Classes::TList 
{
	typedef Classes::TList inherited;
	
public:
	__fastcall TOCollection(int aCapacity);
	void __fastcall AtFree(int Index);
	void __fastcall FreeAll(void);
	void __fastcall DoFree(void * Item);
	virtual void __fastcall FreeItem(void * Item);
	__fastcall virtual ~TOCollection(void);
};


class DELPHICLASS TNoOwnerCollection;
class PASCALIMPLEMENTATION TNoOwnerCollection : public TOCollection 
{
	typedef TOCollection inherited;
	
public:
	virtual void __fastcall FreeItem(void * Item);
public:
	#pragma option push -w-inl
	/* TOCollection.Create */ inline __fastcall TNoOwnerCollection(int aCapacity) : TOCollection(aCapacity
		) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TOCollection.Destroy */ inline __fastcall virtual ~TNoOwnerCollection(void) { }
	#pragma option pop
	
};


class DELPHICLASS TSortedCollection;
class PASCALIMPLEMENTATION TSortedCollection : public TOCollection 
{
	typedef TOCollection inherited;
	
public:
	bool Duplicates;
	__fastcall TSortedCollection(int aCapacity);
	virtual int __fastcall Compare(void * Key1, void * Key2) = 0 ;
	HIDESBASE virtual int __fastcall IndexOf(void * Item);
	HIDESBASE virtual void __fastcall Add(void * Item);
	virtual void __fastcall AddReplace(void * Item);
	virtual void * __fastcall KeyOf(void * Item);
	virtual bool __fastcall Search(void * Key, int &Index);
public:
	#pragma option push -w-inl
	/* TOCollection.Destroy */ inline __fastcall virtual ~TSortedCollection(void) { }
	#pragma option pop
	
};


class DELPHICLASS TStrCollection;
class PASCALIMPLEMENTATION TStrCollection : public TSortedCollection 
{
	typedef TSortedCollection inherited;
	
public:
	virtual int __fastcall Compare(void * Key1, void * Key2);
	virtual void __fastcall FreeItem(void * Item);
public:
	#pragma option push -w-inl
	/* TSortedCollection.Create */ inline __fastcall TStrCollection(int aCapacity) : TSortedCollection(
		aCapacity) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TOCollection.Destroy */ inline __fastcall virtual ~TStrCollection(void) { }
	#pragma option pop
	
};


//-- var, const, procedure ---------------------------------------------------
static const int MaxCollectionSize = 0xfffffff;

}	/* namespace Oobjects */
#if !defined(NO_IMPLICIT_NAMESPACE_USE)
using namespace Oobjects;
#endif
#pragma option pop	// -w-
#pragma option pop	// -Vx

#pragma delphiheader end.
//-- end unit ----------------------------------------------------------------
#endif	// OObjects
