htmlbtns.hpp

TMS component pack v4.2 for delphi

	void __fastcall SetCheckColor(const Graphics::TColor Value);
	void __fastcall SetAlignment(const Classes::TAlignment Value);
	void __fastcall SetButtonVertAlign(const Stdctrls::TTextLayout Value);
	void __fastcall SetContainer(const Picturecontainer::TPictureContainer* Value);
	void __fastcall SetImages(const Controls::TImageList* Value);
	void __fastcall SetEllipsis(const bool Value);
	void __fastcall SetShadowColor(const Graphics::TColor Value);
	void __fastcall SetShadowOffset(const int Value);
	AnsiString __fastcall GetVersion();
	void __fastcall SetVersion(const AnsiString Value);
	
protected:
	virtual int __fastcall GetVersionNr(void);
	virtual void __fastcall Loaded(void);
	virtual void __fastcall ReadState(Classes::TReader* Reader);
	virtual bool __fastcall CanModify(void);
	virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation AOperation);
	__property int Columns = {read=FColumns, write=SetColumns, default=1};
	__property int ItemIndex = {read=FItemIndex, write=SetItemIndex, default=-1};
	__property Classes::TStrings* Items = {read=FItems, write=SetItems};
	
public:
	DYNAMIC void __fastcall GetChildren(Classes::TGetChildProc Proc, Classes::TComponent* Root);
	__fastcall virtual TCustomHTMLRadioGroup(Classes::TComponent* AOwner);
	__fastcall virtual ~TCustomHTMLRadioGroup(void);
	DYNAMIC void __fastcall FlipChildren(bool AllLevels);
	void __fastcall PushKey(char &Key);
	void __fastcall PushKeyDown(Word &Key, Classes::TShiftState Shift);
	
__published:
	__property Classes::TAlignment Alignment = {read=FAlignment, write=SetAlignment, default=0};
	__property TButtonType ButtonType = {read=FButtonType, write=SetButtonType, default=0};
	__property Stdctrls::TTextLayout ButtonVertAlign = {read=FBtnVAlign, write=SetButtonVertAlign, default=0};
	__property Graphics::TColor CheckColor = {read=FCheckColor, write=SetCheckColor, default=0};
	__property bool Ellipsis = {read=FEllipsis, write=SetEllipsis, nodefault};
	__property Controls::TImageList* Images = {read=FImages, write=SetImages};
	__property Picturecontainer::TPictureContainer* PictureContainer = {read=FContainer, write=SetContainer};
	__property Graphics::TColor ShadowColor = {read=FShadowColor, write=SetShadowColor, default=12632256};
	__property int ShadowOffset = {read=FShadowOffset, write=SetShadowOffset, default=1};
	__property TEnabledEvent OnIsEnabled = {read=FOnIsEnabled, write=FOnIsEnabled};
	__property AnsiString Version = {read=GetVersion, write=SetVersion};
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TCustomHTMLRadioGroup(HWND ParentWindow) : Stdctrls::TCustomGroupBox(ParentWindow) { }
	#pragma option pop
	
};


class DELPHICLASS THTMLRadioGroup;
class PASCALIMPLEMENTATION THTMLRadioGroup : public TCustomHTMLRadioGroup 
{
	typedef TCustomHTMLRadioGroup inherited;
	
__published:
	__property Align  = {default=0};
	__property Anchors  = {default=3};
	__property BiDiMode ;
	__property Constraints ;
	__property DragKind  = {default=0};
	__property ParentBiDiMode  = {default=1};
	__property ButtonType  = {default=0};
	__property Caption ;
	__property Color  = {default=-16777211};
	__property Columns  = {default=1};
	__property Ctl3D ;
	__property DragCursor  = {default=-12};
	__property DragMode  = {default=0};
	__property Enabled  = {default=1};
	__property Font ;
	__property ItemIndex  = {default=-1};
	__property Items ;
	__property ParentColor  = {default=1};
	__property ParentCtl3D  = {default=1};
	__property ParentFont  = {default=1};
	__property ParentShowHint  = {default=1};
	__property PopupMenu ;
	__property ShowHint ;
	__property TabOrder  = {default=-1};
	__property TabStop  = {default=0};
	__property Visible  = {default=1};
	__property OnClick ;
	__property OnContextPopup ;
	__property OnDragDrop ;
	__property OnDragOver ;
	__property OnEndDrag ;
	__property OnEnter ;
	__property OnExit ;
	__property OnEndDock ;
	__property OnStartDock ;
	__property OnStartDrag ;
public:
	#pragma option push -w-inl
	/* TCustomHTMLRadioGroup.Create */ inline __fastcall virtual THTMLRadioGroup(Classes::TComponent* AOwner) : TCustomHTMLRadioGroup(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TCustomHTMLRadioGroup.Destroy */ inline __fastcall virtual ~THTMLRadioGroup(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall THTMLRadioGroup(HWND ParentWindow) : TCustomHTMLRadioGroup(ParentWindow) { }
	#pragma option pop
	
};


class DELPHICLASS TCustomHTMLCheckGroup;
class PASCALIMPLEMENTATION TCustomHTMLCheckGroup : public Stdctrls::TCustomGroupBox 
{
	typedef Stdctrls::TCustomGroupBox inherited;
	
private:
	Classes::TList* FButtons;
	Classes::TStrings* FItems;
	int FColumns;
	bool FReading;
	bool FUpdating;
	TButtonType FButtonType;
	Graphics::TColor FCheckColor;
	Classes::TAlignment FAlignment;
	Stdctrls::TTextLayout FBtnVAlign;
	Controls::TImageList* FImages;
	Picturecontainer::TPictureContainer* FContainer;
	bool FEllipsis;
	int FShadowOffset;
	Graphics::TColor FShadowColor;
	TEnabledEvent FOnIsEnabled;
	void __fastcall SetButtonType(const TButtonType Value);
	void __fastcall ArrangeButtons(void);
	void __fastcall ButtonClick(System::TObject* Sender);
	void __fastcall ItemsChange(System::TObject* Sender);
	void __fastcall SetButtonCount(int Value);
	void __fastcall SetColumns(int Value);
	void __fastcall SetItems(Classes::TStrings* Value);
	void __fastcall UpdateButtons(void);
	HIDESBASE MESSAGE void __fastcall CMEnabledChanged(Messages::TMessage &Message);
	HIDESBASE MESSAGE void __fastcall CMFontChanged(Messages::TMessage &Message);
	HIDESBASE MESSAGE void __fastcall WMSize(Messages::TWMSize &Message);
	void __fastcall SetCheckColor(const Graphics::TColor Value);
	void __fastcall SetAlignment(const Classes::TAlignment Value);
	void __fastcall SetButtonVertAlign(const Stdctrls::TTextLayout Value);
	void __fastcall SetContainer(const Picturecontainer::TPictureContainer* Value);
	void __fastcall SetImages(const Controls::TImageList* Value);
	void __fastcall SetEllipsis(const bool Value);
	void __fastcall SetShadowColor(const Graphics::TColor Value);
	void __fastcall SetShadowOffset(const int Value);
	bool __fastcall GetChecked(int Index);
	void __fastcall SetChecked(int Index, const bool Value);
	bool __fastcall GetReadOnly(int Index);
	void __fastcall SetReadOnly(int Index, const bool Value);
	AnsiString __fastcall GetVersion();
	void __fastcall SetVersion(const AnsiString Value);
	int __fastcall GetVersionNr(void);
	
protected:
	virtual void __fastcall Loaded(void);
	virtual void __fastcall ReadState(Classes::TReader* Reader);
	virtual bool __fastcall CanModify(void);
	virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation AOperation);
	__property int Columns = {read=FColumns, write=SetColumns, default=1};
	__property Classes::TStrings* Items = {read=FItems, write=SetItems};
	
public:
	DYNAMIC void __fastcall GetChildren(Classes::TGetChildProc Proc, Classes::TComponent* Root);
	__fastcall virtual TCustomHTMLCheckGroup(Classes::TComponent* AOwner);
	__fastcall virtual ~TCustomHTMLCheckGroup(void);
	DYNAMIC void __fastcall FlipChildren(bool AllLevels);
	void __fastcall PushKey(char &Key);
	void __fastcall PushKeyDown(Word &Key, Classes::TShiftState Shift);
	__property bool Checked[int Index] = {read=GetChecked, write=SetChecked};
	__property bool ReadOnly[int Index] = {read=GetReadOnly, write=SetReadOnly};
	
__published:
	__property Classes::TAlignment Alignment = {read=FAlignment, write=SetAlignment, default=0};
	__property TButtonType ButtonType = {read=FButtonType, write=SetButtonType, default=0};
	__property Stdctrls::TTextLayout ButtonVertAlign = {read=FBtnVAlign, write=SetButtonVertAlign, default=0};
	__property Graphics::TColor CheckColor = {read=FCheckColor, write=SetCheckColor, default=0};
	__property bool Ellipsis = {read=FEllipsis, write=SetEllipsis, nodefault};
	__property Controls::TImageList* Images = {read=FImages, write=SetImages};
	__property Picturecontainer::TPictureContainer* PictureContainer = {read=FContainer, write=SetContainer};
	__property Graphics::TColor ShadowColor = {read=FShadowColor, write=SetShadowColor, default=12632256};
	__property int ShadowOffset = {read=FShadowOffset, write=SetShadowOffset, default=1};
	__property TEnabledEvent OnIsEnabled = {read=FOnIsEnabled, write=FOnIsEnabled};
	__property AnsiString Version = {read=GetVersion, write=SetVersion};
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TCustomHTMLCheckGroup(HWND ParentWindow) : Stdctrls::TCustomGroupBox(ParentWindow) { }
	#pragma option pop
	
};


class DELPHICLASS THTMLCheckGroup;
class PASCALIMPLEMENTATION THTMLCheckGroup : public TCustomHTMLCheckGroup 
{
	typedef TCustomHTMLCheckGroup inherited;
	
__published:
	__property Align  = {default=0};
	__property Anchors  = {default=3};
	__property BiDiMode ;
	__property Constraints ;
	__property DragKind  = {default=0};
	__property ParentBiDiMode  = {default=1};
	__property ButtonType  = {default=0};
	__property Caption ;
	__property Color  = {default=-16777211};
	__property Columns  = {default=1};
	__property Ctl3D ;
	__property DragCursor  = {default=-12};
	__property DragMode  = {default=0};
	__property Enabled  = {default=1};
	__property Font ;
	__property Items ;
	__property ParentColor  = {default=1};
	__property ParentCtl3D  = {default=1};
	__property ParentFont  = {default=1};
	__property ParentShowHint  = {default=1};
	__property PopupMenu ;
	__property ShowHint ;
	__property TabOrder  = {default=-1};
	__property TabStop  = {default=0};
	__property Visible  = {default=1};
	__property OnClick ;
	__property OnContextPopup ;
	__property OnDragDrop ;
	__property OnDragOver ;
	__property OnEndDrag ;
	__property OnEnter ;
	__property OnExit ;
	__property OnEndDock ;
	__property OnStartDock ;
	__property OnStartDrag ;
public:
	#pragma option push -w-inl
	/* TCustomHTMLCheckGroup.Create */ inline __fastcall virtual THTMLCheckGroup(Classes::TComponent* AOwner) : TCustomHTMLCheckGroup(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TCustomHTMLCheckGroup.Destroy */ inline __fastcall virtual ~THTMLCheckGroup(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall THTMLCheckGroup(HWND ParentWindow) : TCustomHTMLCheckGroup(ParentWindow) { }
	#pragma option pop
	
};


//-- var, const, procedure ---------------------------------------------------
static const Shortint MAJ_VER = 0x1;
static const Shortint MIN_VER = 0x5;
static const Shortint REL_VER = 0x1;
static const Shortint BLD_VER = 0x2;

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

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