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

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

#ifndef AHMTResourceDetailsHPP
#define AHMTResourceDetailsHPP
#include <AHMSystemClass.hpp>
#include <Classes.hpp>
#include <Windows.hpp>
#include <SysInit.hpp>
#include <System.hpp>

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

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

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

}	/* namespace Ahmtresourcedetails */
#if !defined(NO_IMPLICIT_NAMESPACE_USE)
using namespace Ahmtresourcedetails;
#endif
//-- end unit ----------------------------------------------------------------
#endif	// AHMTResourceDetails
