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

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

#ifndef ahmtgaugeHPP
#define ahmtgaugeHPP

#pragma delphiheader begin
#pragma option push -w-
#pragma option push -Vx
#include <ahmcontrols.hpp>	// Pascal unit
#include <ahmenhancedclass.hpp>	// Pascal unit
#include <Dialogs.hpp>	// Pascal unit
#include <Graphics.hpp>	// Pascal unit
#include <Menus.hpp>	// Pascal unit
#include <Forms.hpp>	// Pascal unit
#include <ahmtbackground.hpp>	// Pascal unit
#include <Controls.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 Ahmtgauge
{
//-- type declarations -------------------------------------------------------
class DELPHICLASS TAHMGauge;
class PASCALIMPLEMENTATION TAHMGauge : public Ahmcontrols::TAHMGraphicControl 
{
	typedef Ahmcontrols::TAHMGraphicControl inherited;
	
private:
	Byte FPercent;
	Byte FBorder;
	Ahmenhancedclass::TAHMFont3D* f3d;
	Graphics::TColor FInsideColor;
	Graphics::TColor FSegColor;
	Ahmtbackground::TAHMBackground* fback;
	Byte FSegWidth;
	Byte FSegGap;
	Ahmenhancedclass::TAHMGlyph* FAHMGlyph;
	Ahmenhancedclass::TAHMPosition fpp;
	Ahmenhancedclass::TAHMKind fkind;
	Ahmenhancedclass::TAHMFrame* fouter;
	Ahmenhancedclass::TAHMFrame* finner;
	void __fastcall Setouter(Ahmenhancedclass::TAHMFrame* value);
	void __fastcall Setinner(Ahmenhancedclass::TAHMFrame* value);
	void __fastcall SetPercent(Byte Value);
	void __fastcall SetBorderwidth(Byte Value);
	void __fastcall SetInsideColor(Graphics::TColor value);
	void __fastcall SetBack(Ahmtbackground::TAHMBackground* value);
	void __fastcall SetSegColor(Graphics::TColor value);
	void __fastcall SetAHMGlyph(Ahmenhancedclass::TAHMGlyph* value);
	void __fastcall SetSegWidth(Byte value);
	void __fastcall SetSegGap(Byte value);
	void __fastcall SetKindType(Ahmenhancedclass::TAHMKind value);
	void __fastcall SetPicPos(Ahmenhancedclass::TAHMPosition value);
	void __fastcall Set3D(Ahmenhancedclass::TAHMFont3D* value);
	
protected:
	#pragma pack(push, 1)
	Types::TRect frm;
	#pragma pack(pop)
	
	void __fastcall UpdateProgress(void);
	virtual void __fastcall Paint(void);
	virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation Operation);
	
public:
	__fastcall virtual TAHMGauge(Classes::TComponent* AOwner);
	__fastcall virtual ~TAHMGauge(void);
	__property Canvas ;
	
__published:
	__property Align  = {default=0};
	__property Cursor  = {default=0};
	__property Ahmenhancedclass::TAHMGlyph* Glyph = {read=FAHMGlyph, write=SetAHMGlyph};
	__property OnClick ;
	__property OnDblClick ;
	__property OnMouseDown ;
	__property OnMouseMove ;
	__property OnMouseUp ;
	__property Font ;
	__property Ahmenhancedclass::TAHMFont3D* Font3D = {read=f3d, write=Set3D, stored=true};
	__property Ahmtbackground::TAHMBackground* Background = {read=fback, write=SetBack};
	__property Ahmenhancedclass::TAHMFrame* BevelInner = {read=finner, write=Setinner, stored=true};
	__property Ahmenhancedclass::TAHMFrame* BevelOuter = {read=fouter, write=Setouter, stored=true};
	__property Ahmenhancedclass::TAHMPosition PicturePosition = {read=fpp, write=SetPicPos, default=0};
	__property Byte Borderwidth = {read=FBorder, write=SetBorderwidth, default=6};
	__property Ahmenhancedclass::TAHMKind Kind = {read=fkind, write=SetKindType, default=1};
	__property Byte SegmentGap = {read=FSegGap, write=SetSegGap, default=2};
	__property Byte SegmentWidth = {read=FSegWidth, write=SetSegWidth, default=8};
	__property Graphics::TColor SegmentColor = {read=FSegColor, write=SetSegColor, default=8388608};
	__property Graphics::TColor InsideBackColor = {read=FInsideColor, write=SetInsideColor, default=16777215};
	__property Byte Percentage = {read=FPercent, write=SetPercent, default=0};
	__property Width  = {default=100};
	__property Height  = {default=18};
};


//-- var, const, procedure ---------------------------------------------------
extern PACKAGE int fl;
extern PACKAGE int ft;
extern PACKAGE int fb;
extern PACKAGE int fr;
extern PACKAGE int fbw;

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

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