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

// (DO NOT EDIT: machine generated header) 'wclPowerEvents.pas' rev: 6.00

#ifndef wclPowerEventsHPP
#define wclPowerEventsHPP

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

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

namespace Wclpowerevents
{
//-- type declarations -------------------------------------------------------
#pragma option push -b
enum TwclPowerState { psResumeAutomatic, psResume, psSuspend, psUnknown };
#pragma option pop

typedef void __fastcall (__closure *TwclPowerStateChangedEvent)(System::TObject* Sender, const TwclPowerState State);

class DELPHICLASS TwclPowerEventsMonitor;
class PASCALIMPLEMENTATION TwclPowerEventsMonitor : public System::TObject 
{
	typedef System::TObject inherited;
	
private:
	Wclmessaging::TwclMessageReceiver* FReceiver;
	TwclPowerStateChangedEvent FOnPowerStateChanged;
	bool __fastcall GetActive(void);
	
protected:
	virtual void __fastcall MessageReceived(const Wclmessaging::TwclMessage* Message);
	virtual void __fastcall DoPowerStateChanged(const TwclPowerState State);
	
public:
	__fastcall virtual TwclPowerEventsMonitor(void);
	__fastcall virtual ~TwclPowerEventsMonitor(void);
	int __fastcall Close(void);
	int __fastcall Open(void);
	__property bool Active = {read=GetActive, nodefault};
	__property TwclPowerStateChangedEvent OnPowerStateChanged = {read=FOnPowerStateChanged, write=FOnPowerStateChanged};
};


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

}	/* namespace Wclpowerevents */
using namespace Wclpowerevents;
#pragma option pop	// -w-
#pragma option pop	// -Vx

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