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

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

#ifndef ahmtofficebuttonHPP
#define ahmtofficebuttonHPP

#pragma delphiheader begin
#pragma option push -w-
#pragma option push -Vx
#include <ahmtbackground.hpp>	// Pascal unit
#include <ahmenhancedclass.hpp>	// Pascal unit
#include <ahmcontrols.hpp>	// Pascal unit
#include <Controls.hpp>	// Pascal unit
#include <Graphics.hpp>	// Pascal unit
#include <Classes.hpp>	// Pascal unit
#include <SysUtils.hpp>	// Pascal unit
#include <Messages.hpp>	// Pascal unit
#include <Windows.hpp>	// Pascal unit
#include <SysInit.hpp>	// Pascal unit
#include <System.hpp>	// Pascal unit

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

namespace Ahmtofficebutton
{
//-- type declarations -------------------------------------------------------
class DELPHICLASS TAHMOfficeButton;
class PASCALIMPLEMENTATION TAHMOfficeButton : public Ahmcontrols::TAHMGraphicControl 
{
	typedef Ahmcontrols::TAHMGraphicControl inherited;
	
private:
	AnsiString FAHMAboutStr;
	int FRoundSize;
	Graphics::TColor FBorderColor;
	Ahmtbackground::TAHMBackground* fback;
	Graphics::TColor fin;
	Graphics::TColor fout;
	Graphics::TColor fnorm;
	Ahmenhancedclass::TAHMFont3D* f3d;
	bool HasMouse;
	bool IsMouseDown;
	Word ExtraSpace;
	void __fastcall SetBorderColor(Graphics::TColor value);
	void __fastcall SetRoundSize(int value);
	void __fastcall SetBack(Ahmtbackground::TAHMBackground* value);
	void __fastcall Setnorm(Graphics::TColor value);
	void __fastcall Set3D(Ahmenhancedclass::TAHMFont3D* value);
	void __fastcall Setcaption(const AnsiString value);
	AnsiString __fastcall getcaption();
	HIDESBASE MESSAGE void __fastcall CMMouseEnter(Messages::TMessage &Message);
	HIDESBASE MESSAGE void __fastcall CMMouseLeave(Messages::TMessage &Message);
	
protected:
	DYNAMIC void __fastcall MouseDown(Controls::TMouseButton Button, Classes::TShiftState Shift, int X, int Y);
	DYNAMIC void __fastcall MouseUp(Controls::TMouseButton Button, Classes::TShiftState Shift, int X, int Y);
	virtual void __fastcall Paint(void);
	virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation Operation);
	
public:
	__fastcall virtual TAHMOfficeButton(Classes::TComponent* AOwner);
	__fastcall virtual ~TAHMOfficeButton(void);
	virtual void __fastcall Loaded(void);
	
__published:
	__property AnsiString About = {read=FAHMAboutStr, write=FAHMAboutStr, stored=false};
	__property AnsiString Caption = {read=getcaption, write=Setcaption};
	__property Graphics::TColor BorderColor = {read=FBorderColor, write=SetBorderColor, default=0};
	__property Font ;
	__property Graphics::TColor LedNormal = {read=fnorm, write=Setnorm, default=8388608};
	__property Graphics::TColor LedIn = {read=fin, write=fin, default=16776960};
	__property Graphics::TColor LedOut = {read=fout, write=fout, default=8421376};
	__property int RoundSize = {read=FRoundSize, write=SetRoundSize, default=20};
	__property Ahmenhancedclass::TAHMFont3D* Font3D = {read=f3d, write=Set3D};
	__property Ahmtbackground::TAHMBackground* Background = {read=fback, write=SetBack};
	__property Enabled  = {default=1};
	__property ShowHint ;
	__property Visible  = {default=1};
	__property OnClick ;
	__property OnDblClick ;
	__property OnMouseDown ;
	__property OnMouseMove ;
	__property OnMouseUp ;
};


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

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

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