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

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

#ifndef ahmdialogclassHPP
#define ahmdialogclassHPP

#pragma delphiheader begin
#pragma option push -w-
#pragma option push -Vx
#include <ShellAPI.hpp>	// Pascal unit
#include <ExtCtrls.hpp>	// Pascal unit
#include <StdCtrls.hpp>	// Pascal unit
#include <Buttons.hpp>	// Pascal unit
#include <Forms.hpp>	// Pascal unit
#include <Controls.hpp>	// Pascal unit
#include <Graphics.hpp>	// Pascal unit
#include <Classes.hpp>	// Pascal unit
#include <Windows.hpp>	// Pascal unit
#include <SysUtils.hpp>	// Pascal unit
#include <SysInit.hpp>	// Pascal unit
#include <System.hpp>	// Pascal unit

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

namespace Ahmdialogclass
{
//-- type declarations -------------------------------------------------------
typedef AnsiString TAHMAboutDlgsStr;

typedef AnsiString TAHMExecDlgStr;

#pragma option push -b-
enum TAHMBeeptype { bNone, bDefault, bAsterix, bExclamation, bQuestion, bCriticalStop };
#pragma option pop

class DELPHICLASS TAHMDialogComponent;
class PASCALIMPLEMENTATION TAHMDialogComponent : public Classes::TComponent 
{
	typedef Classes::TComponent inherited;
	
private:
	TAHMBeeptype FBeepType;
	AnsiString FAHMAboutStr;
	
public:
	virtual bool __fastcall Execute(void);
	
__published:
	__property AnsiString About = {read=FAHMAboutStr, write=FAHMAboutStr, stored=false};
	__property TAHMBeeptype Sound = {read=FBeepType, write=FBeepType, default=0};
public:
	#pragma option push -w-inl
	/* TComponent.Create */ inline __fastcall virtual TAHMDialogComponent(Classes::TComponent* AOwner) : Classes::TComponent(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TComponent.Destroy */ inline __fastcall virtual ~TAHMDialogComponent(void) { }
	#pragma option pop
	
};


class DELPHICLASS TAHMAdvDialogComponent;
class PASCALIMPLEMENTATION TAHMAdvDialogComponent : public TAHMDialogComponent 
{
	typedef TAHMDialogComponent inherited;
	
private:
	AnsiString FFormCaption;
	int FWidth;
	int FHeight;
	int FFormLeft;
	int FFormTop;
	Forms::TPosition FPosition;
	Forms::TFormBorderStyle FBorderStyle;
	Classes::THelpContext FHelpContext;
	AnsiString FHelpFile;
	
public:
	void __fastcall SetFormProperties(Forms::TForm* AForm);
	__fastcall virtual TAHMAdvDialogComponent(Classes::TComponent* AOwner);
	__fastcall virtual ~TAHMAdvDialogComponent(void);
	
__published:
	__property AnsiString FormCaption = {read=FFormCaption, write=FFormCaption};
	__property int FormWidth = {read=FWidth, write=FWidth, default=500};
	__property int FormHeight = {read=FHeight, write=FHeight, default=350};
	__property Forms::TPosition Position = {read=FPosition, write=FPosition, default=4};
	__property int FormTop = {read=FFormTop, write=FFormTop, default=0};
	__property int FormLeft = {read=FFormLeft, write=FFormLeft, default=0};
	__property Classes::THelpContext HelpContext = {read=FHelpContext, write=FHelpContext, default=0};
	__property AnsiString Helpfile = {read=FHelpFile, write=FHelpFile};
	__property Forms::TFormBorderStyle BorderStyle = {read=FBorderStyle, write=FBorderStyle, default=3};
};


class DELPHICLASS TAHMButtonDetails;
class PASCALIMPLEMENTATION TAHMButtonDetails : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	bool fvisible;
	bool fconf;
	bool fenabled;
	AnsiString FConfirmMessage;
	AnsiString fcaption;
	Graphics::TBitmap* fgly;
	AnsiString fhint;
	bool fshint;
	System::TObject* fattach;
	Classes::TNotifyEvent FOnChange;
	void __fastcall Invalidate(void);
	void __fastcall Setglyph(Graphics::TBitmap* value);
	void __fastcall SetEnabled(bool value);
	void __fastcall SetVisible(bool value);
	void __fastcall SetCaption(AnsiString value);
	void __fastcall SetHint(AnsiString value);
	void __fastcall SetSHint(bool value);
	void __fastcall SetConfirmMessage(const AnsiString Value);
	void __fastcall SetConfirmOnPress(const bool Value);
	
public:
	__fastcall TAHMButtonDetails(System::TObject* Attached);
	__property Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
	
__published:
	__property Graphics::TBitmap* Glyph = {read=fgly, write=Setglyph, stored=true};
	__property bool Visible = {read=fvisible, write=SetVisible, default=1};
	__property bool Enabled = {read=fenabled, write=SetEnabled, default=1};
	__property bool ConfirmOnPress = {read=fconf, write=SetConfirmOnPress, default=0};
	__property AnsiString ConfirmMessage = {read=FConfirmMessage, write=SetConfirmMessage};
	__property AnsiString Caption = {read=fcaption, write=SetCaption};
	__property AnsiString Hint = {read=fhint, write=SetHint};
	__property bool ShowHint = {read=fshint, write=SetSHint, default=0};
public:
	#pragma option push -w-inl
	/* TPersistent.Destroy */ inline __fastcall virtual ~TAHMButtonDetails(void) { }
	#pragma option pop
	
};


//-- var, const, procedure ---------------------------------------------------
extern PACKAGE void __fastcall ShowDialogsAbout(void);

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

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