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

// (DO NOT EDIT: machine generated header) 'Iwcompbuttonwap.pas' rev: 10.00

#ifndef IwcompbuttonwapHPP
#define IwcompbuttonwapHPP

#pragma delphiheader begin
#pragma option push
#pragma option -w-      // All warnings off
#pragma option -Vx      // Zero-length empty class member functions
#pragma pack(push,8)
#include <System.hpp>	// Pascal unit
#include <Sysinit.hpp>	// Pascal unit
#include <Classes.hpp>	// Pascal unit
#include <Iwcontrolwap.hpp>	// Pascal unit
#include <Iwbasewapinterfaces.hpp>	// Pascal unit
#include <Iwbasecontrol.hpp>	// Pascal unit
#include <Iwbaserendercontext.hpp>	// Pascal unit
#include <Iwwaptag.hpp>	// Pascal unit
#include <Iwbasecomponent.hpp>	// Pascal unit
#include <Iwbaseinterfaces.hpp>	// Pascal unit
#include <Iwmarkuplanguagetag.hpp>	// Pascal unit
#include <Iwtypes.hpp>	// Pascal unit
#include <Iwbasewapcontrol.hpp>	// Pascal unit
#include <Iwwaprendercontext.hpp>	// Pascal unit
#include <Iwbaseform.hpp>	// Pascal unit
#include <Iwvclbasecontrol.hpp>	// Pascal unit
#include <Controls.hpp>	// Pascal unit

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

namespace Iwcompbuttonwap
{
//-- type declarations -------------------------------------------------------
#pragma option push -b-
enum TIWXHTMLMPButtonType { btSubmit, btReset };
#pragma option pop

class DELPHICLASS TIWCustomButtonWAP;
class PASCALIMPLEMENTATION TIWCustomButtonWAP : public Iwcontrolwap::TIWCustomControlWAP 
{
	typedef Iwcontrolwap::TIWCustomControlWAP inherited;
	
protected:
	AnsiString FSubmitParam;
	TIWXHTMLMPButtonType FButtonType;
	virtual void __fastcall Submit(const AnsiString AValue);
	virtual void __fastcall InitControl(void);
	AnsiString __fastcall GEtSubmitParam();
	
public:
	virtual Iwwaptag::TIWWAPTag* __fastcall RenderWap(Iwwaprendercontext::TIWBaseWAPComponentContext* AContext);
	__property TIWXHTMLMPButtonType ButtonType = {read=FButtonType, write=FButtonType, nodefault};
public:
	#pragma option push -w-inl
	/* TIWVCLBaseControl.Create */ inline __fastcall virtual TIWCustomButtonWAP(Classes::TComponent* AOwner) : Iwcontrolwap::TIWCustomControlWAP(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TIWVCLBaseControl.Destroy */ inline __fastcall virtual ~TIWCustomButtonWAP(void) { }
	#pragma option pop
	
private:
	void *__IIWSubmitControl;	/* Iwbaseinterfaces::IIWSubmitControl */
	
public:
	operator IIWSubmitControl*(void) { return (IIWSubmitControl*)&__IIWSubmitControl; }
	
};


class DELPHICLASS TIWButtonWAP;
class PASCALIMPLEMENTATION TIWButtonWAP : public TIWCustomButtonWAP 
{
	typedef TIWCustomButtonWAP inherited;
	
__published:
	__property Caption ;
	__property OnClick ;
	__property ButtonType ;
	__property Enabled  = {default=1};
public:
	#pragma option push -w-inl
	/* TIWVCLBaseControl.Create */ inline __fastcall virtual TIWButtonWAP(Classes::TComponent* AOwner) : TIWCustomButtonWAP(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TIWVCLBaseControl.Destroy */ inline __fastcall virtual ~TIWButtonWAP(void) { }
	#pragma option pop
	
};


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

}	/* namespace Iwcompbuttonwap */
using namespace Iwcompbuttonwap;
#pragma pack(pop)
#pragma option pop

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