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

// (DO NOT EDIT: machine generated header) 'AHMTResourceDetails.pas' rev: 4.00

#ifndef AHMTResourceDetailsHPP
#define AHMTResourceDetailsHPP

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

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

namespace Ahmtresourcedetails
{
//-- type declarations -------------------------------------------------------
class DELPHICLASS TAHMResourceDetails;
#pragma pack(push, 4)
class PASCALIMPLEMENTATION TAHMResourceDetails : public Ahmsystemclass::TAHMSystemsComponent 
{
	typedef Ahmsystemclass::TAHMSystemsComponent inherited;
	
private:
	unsigned FMemoryLoad;
	unsigned FTotalPhysical;
	unsigned FAvailPhysical;
	unsigned FAvailPageFile;
	unsigned FTotalPageFile;
	unsigned FTotalVirtual;
	unsigned FAvailVirtual;
	Classes::TNotifyEvent FOnUpdate;
	unsigned __fastcall GetAvailPhysical(void);
	unsigned __fastcall GetAvailVirtual(void);
	unsigned __fastcall GetMemoryLoad(void);
	unsigned __fastcall GetTotalPageFile(void);
	unsigned __fastcall GetTotalPhysical(void);
	unsigned __fastcall GetTotalVirtual(void);
	void __fastcall SetDWord(const unsigned Value);
	unsigned __fastcall GetAvailPageFile(void);
	
public:
	__fastcall virtual TAHMResourceDetails(Classes::TComponent* AOwner);
	virtual void __fastcall Loaded(void);
	void __fastcall UpdateResources(void);
	
__published:
	__property unsigned MemoryLoad = {read=GetMemoryLoad, write=SetDWord, stored=false, nodefault};
	__property unsigned TotalPhysical = {read=GetTotalPhysical, write=SetDWord, stored=false, nodefault
		};
	__property unsigned AvailPhysical = {read=GetAvailPhysical, write=SetDWord, stored=false, nodefault
		};
	__property unsigned AvailPageFile = {read=GetAvailPageFile, write=SetDWord, stored=false, nodefault
		};
	__property unsigned TotalPageFile = {read=GetTotalPageFile, write=SetDWord, stored=false, nodefault
		};
	__property unsigned TotalVirtual = {read=GetTotalVirtual, write=SetDWord, stored=false, nodefault};
		
	__property unsigned AvailVirtual = {read=GetAvailVirtual, write=SetDWord, stored=false, nodefault};
		
	__property Classes::TNotifyEvent OnUpdate = {read=FOnUpdate, write=FOnUpdate};
public:
	#pragma option push -w-inl
	/* TComponent.Destroy */ inline __fastcall virtual ~TAHMResourceDetails(void) { }
	#pragma option pop
	
};

#pragma pack(pop)

//-- var, const, procedure ---------------------------------------------------

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

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