advselectors.hpp

TMS component pack v4.2 for delphi

	__property Color  = {default=-16777211};
	__property ColorTo  = {default=536870911};
	__property ColorDown ;
	__property ColorDownTo  = {default=536870911};
	__property ColorHot ;
	__property ColorHotTo  = {default=536870911};
	__property ColorDropDown ;
	__property ColorDropDownTo  = {default=536870911};
	__property ColorSelected ;
	__property ColorSelectedTo ;
	__property DropDownButton  = {default=0};
	__property Glyph ;
	__property GlyphHot ;
	__property GlyphDown ;
	__property Style ;
	__property SelectedIndex ;
	__property bool ShowSelectedGradient = {read=FShowSelectedGradient, write=SetShowSelectedGradient, default=0};
	__property Tools ;
	__property ShowHint ;
	__property OnMouseEnter ;
	__property OnMouseLeave ;
	__property OnDropDown ;
	__property OnClick ;
	__property OnSelect ;
	__property OnHotTool ;
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TAdvGradientDirectionSelector(HWND ParentWindow) : TAdvCustomSelector(ParentWindow) { }
	#pragma option pop
	
};


class DELPHICLASS TAdvCustomColorSelector;
class PASCALIMPLEMENTATION TAdvCustomColorSelector : public TAdvCustomSelector 
{
	typedef TAdvCustomSelector inherited;
	
private:
	TAdvColorCubePanel* FColorCubePanel;
	TAdvColorSpectrumPanel* FSpectrumPanel;
	TColorSelectionStyle FColorSelectionStyle;
	bool FShowSelectedColor;
	Graphics::TColor FSelectedColor;
	bool FShowRGBHint;
	void __fastcall SetColorSelectionStyle(const TColorSelectionStyle Value);
	void __fastcall SelectorPanelOnDrawItem(System::TObject* Sender, int Index, const Types::TRect &R);
	void __fastcall SetShowSelectedColor(const bool Value);
	void __fastcall CubePanelOnSelect(System::TObject* Sender);
	void __fastcall SpectrumPanelOnSelect(System::TObject* Sender);
	void __fastcall SetSelectedColor(const Graphics::TColor Value);
	Graphics::TColor __fastcall GetSelectedColor(void);
	
protected:
	virtual void __fastcall Initialize(void);
	virtual void __fastcall Loaded(void);
	virtual void __fastcall OnToolSelect(void);
	virtual void __fastcall SetSelectorPanel(void);
	virtual void __fastcall DrawGlyphAndCaption(Graphics::TBitmap* aGlyph, const Types::TRect &R);
	
public:
	__fastcall virtual TAdvCustomColorSelector(Classes::TComponent* AOwner);
	__fastcall virtual ~TAdvCustomColorSelector(void);
	__property AppearanceStyle  = {default=0};
	__property ButtonsPerRow  = {default=1};
	__property TColorSelectionStyle SelectionStyle = {read=FColorSelectionStyle, write=SetColorSelectionStyle, default=0};
	__property bool ShowSelectedColor = {read=FShowSelectedColor, write=SetShowSelectedColor, default=1};
	__property Graphics::TColor SelectedColor = {read=GetSelectedColor, write=SetSelectedColor, nodefault};
	__property bool ShowRGBHint = {read=FShowRGBHint, write=FShowRGBHint, nodefault};
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TAdvCustomColorSelector(HWND ParentWindow) : TAdvCustomSelector(ParentWindow) { }
	#pragma option pop
	
};


class DELPHICLASS TAdvColorSelector;
class PASCALIMPLEMENTATION TAdvColorSelector : public TAdvCustomColorSelector 
{
	typedef TAdvCustomColorSelector inherited;
	
protected:
	virtual void __fastcall Initialize(void);
	
__published:
	__property SelectionStyle  = {default=0};
	__property ShowSelectedColor  = {default=1};
	__property SelectedColor ;
	__property ShowRGBHint ;
	__property AutoThemeAdapt ;
	__property BorderColor  = {default=536870911};
	__property BorderDownColor  = {default=536870911};
	__property BorderHotColor  = {default=536870911};
	__property BorderDropDownColor  = {default=8421504};
	__property Caption ;
	__property Color  = {default=-16777211};
	__property ColorTo  = {default=536870911};
	__property ColorDown ;
	__property ColorDownTo  = {default=536870911};
	__property ColorHot ;
	__property ColorHotTo  = {default=536870911};
	__property ColorDropDown ;
	__property ColorDropDownTo  = {default=536870911};
	__property ColorSelected ;
	__property ColorSelectedTo ;
	__property DropDownButton  = {default=0};
	__property Glyph ;
	__property GlyphHot ;
	__property GlyphDown ;
	__property ShowHint ;
	__property Style ;
	__property Tools ;
	__property OnMouseEnter ;
	__property OnMouseLeave ;
	__property OnDropDown ;
	__property OnClick ;
	__property OnSelect ;
public:
	#pragma option push -w-inl
	/* TAdvCustomColorSelector.Create */ inline __fastcall virtual TAdvColorSelector(Classes::TComponent* AOwner) : TAdvCustomColorSelector(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TAdvCustomColorSelector.Destroy */ inline __fastcall virtual ~TAdvColorSelector(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TAdvColorSelector(HWND ParentWindow) : TAdvCustomColorSelector(ParentWindow) { }
	#pragma option pop
	
};


class DELPHICLASS TAdvTextColorSelector;
class PASCALIMPLEMENTATION TAdvTextColorSelector : public TAdvCustomColorSelector 
{
	typedef TAdvCustomColorSelector inherited;
	
protected:
	virtual void __fastcall Initialize(void);
	
__published:
	__property AutoThemeAdapt ;
	__property BorderColor  = {default=536870911};
	__property BorderDownColor  = {default=536870911};
	__property BorderHotColor  = {default=536870911};
	__property BorderDropDownColor  = {default=8421504};
	__property Caption ;
	__property Color  = {default=-16777211};
	__property ColorTo  = {default=536870911};
	__property ColorDown ;
	__property ColorDownTo  = {default=536870911};
	__property ColorHot ;
	__property ColorHotTo  = {default=536870911};
	__property ColorDropDown ;
	__property ColorDropDownTo  = {default=536870911};
	__property ColorSelected ;
	__property ColorSelectedTo ;
	__property DropDownButton  = {default=0};
	__property Glyph ;
	__property GlyphHot ;
	__property GlyphDown ;
	__property ShowHint ;
	__property ShowSelectedColor  = {default=1};
	__property SelectedColor ;
	__property Style ;
	__property Tools ;
	__property OnMouseEnter ;
	__property OnMouseLeave ;
	__property OnDropDown ;
	__property OnClick ;
	__property OnSelect ;
public:
	#pragma option push -w-inl
	/* TAdvCustomColorSelector.Create */ inline __fastcall virtual TAdvTextColorSelector(Classes::TComponent* AOwner) : TAdvCustomColorSelector(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TAdvCustomColorSelector.Destroy */ inline __fastcall virtual ~TAdvTextColorSelector(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TAdvTextColorSelector(HWND ParentWindow) : TAdvCustomColorSelector(ParentWindow) { }
	#pragma option pop
	
};


class DELPHICLASS TAdvCustomTableSelector;
class PASCALIMPLEMENTATION TAdvCustomTableSelector : public TAdvCustomSelector 
{
	typedef TAdvCustomSelector inherited;
	
private:
	TAdvTableSelectorPanel* FTableSelectorPanel;
	int FSelectedColumns;
	int FSelectedRows;
	int FDefaultRowCount;
	int FDefaultColCount;
	Classes::TNotifyEvent FOnSelect;
	AnsiString FTextTable;
	AnsiString FTextCancel;
	void __fastcall SetDefaultColCount(const int Value);
	void __fastcall SetDefaultRowCount(const int Value);
	void __fastcall TableSelectorOnSelect(System::TObject* Sender);
	
protected:
	DYNAMIC void __fastcall MouseMove(Classes::TShiftState Shift, int X, int Y);
	virtual void __fastcall Loaded(void);
	virtual void __fastcall SetSelectorPanel(void);
	__property int DefaultColCount = {read=FDefaultColCount, write=SetDefaultColCount, default=5};
	__property int DefaultRowCount = {read=FDefaultRowCount, write=SetDefaultRowCount, default=4};
	__property int SelectedColumns = {read=FSelectedColumns, default=0};
	__property int SelectedRows = {read=FSelectedRows, default=0};
	
public:
	__fastcall virtual TAdvCustomTableSelector(Classes::TComponent* AOwner);
	__fastcall virtual ~TAdvCustomTableSelector(void);
	__property AnsiString TextTable = {read=FTextTable, write=FTextTable};
	__property AnsiString TextCancel = {read=FTextCancel, write=FTextCancel};
	__property Classes::TNotifyEvent OnSelect = {read=FOnSelect, write=FOnSelect};
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TAdvCustomTableSelector(HWND ParentWindow) : TAdvCustomSelector(ParentWindow) { }
	#pragma option pop
	
};


class DELPHICLASS TAdvTableSelector;
class PASCALIMPLEMENTATION TAdvTableSelector : public TAdvCustomTableSelector 
{
	typedef TAdvCustomTableSelector inherited;
	
public:
	__property SelectedColumns  = {default=0};
	__property SelectedRows  = {default=0};
	__property AppearanceStyle  = {default=0};
	
__published:
	__property AutoThemeAdapt ;
	__property BorderColor  = {default=536870911};
	__property BorderDownColor  = {default=536870911};
	__property BorderHotColor  = {default=536870911};
	__property Caption ;
	__property Color  = {default=-16777211};
	__property ColorTo  = {default=536870911};
	__property ColorDown ;
	__property ColorDownTo  = {default=536870911};
	__property ColorHot ;
	__property ColorHotTo  = {default=536870911};
	__property DefaultColCount  = {default=5};
	__property DefaultRowCount  = {default=4};
	__property DropDownButton  = {default=0};
	__property Glyph ;
	__property GlyphHot ;
	__property GlyphDown ;
	__property ShowHint ;
	__property Style ;
	__property TextTable ;
	__property TextCancel ;
	__property OnMouseEnter ;
	__property OnMouseLeave ;
	__property OnDropDown ;
	__property OnClick ;
	__property OnSelect ;
public:
	#pragma option push -w-inl
	/* TAdvCustomTableSelector.Create */ inline __fastcall virtual TAdvTableSelector(Classes::TComponent* AOwner) : TAdvCustomTableSelector(AOwner) { }
	#pragma option pop
	#pragma option push -w-inl
	/* TAdvCustomTableSelector.Destroy */ inline __fastcall virtual ~TAdvTableSelector(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TAdvTableSelector(HWND ParentWindow) : TAdvCustomTableSelector(ParentWindow) { }
	#pragma option pop
	
};


class DELPHICLASS TAdvCharacterSelector;
class PASCALIMPLEMENTATION TAdvCharacterSelector : public TAdvCustomSelector 
{
	typedef TAdvCustomSelector inherited;
	
private:
	Classes::TNotifyEvent FOnSelect;
	AnsiString FCharacters;
	char FSelectedChar;
	bool FAutoLoad;
	Graphics::TFont* FCharFont;
	void __fastcall AddItemsFromChars(void);
	void __fastcall LoadCharFromFont(void);
	void __fastcall SetCharacters(const AnsiString Value);
	void __fastcall SetSelectedChar(const char Value);
	void __fastcall SetAutoLoad(const bool Value);
	void __fastcall SetCharFont(const Graphics::TFont* Value);
	
protected:
	virtual void __fastcall Loaded(void);
	virtual void __fastcall OnToolSelect(void);
	virtual void __fastcall SetSelectorPanel(void);
	virtual void __fastcall DrawGlyphAndCaption(Graphics::TBitmap* AGlyph, const Types::TRect &R);
	
public:
	__fastcall virtual TAdvCharacterSelector(Classes::TComponent* AOwner);
	__fastcall virtual ~TAdvCharacterSelector(void);
	__property AppearanceStyle  = {default=0};
	__property char SelectedChar = {read=FSelectedChar, write=SetSelectedChar, nodefault};
	__property Tools ;
	
__published:
	__property bool AutoLoad = {read=FAutoLoad, write=SetAutoLoad, default=1};
	__property AutoThemeAdapt ;
	__property BorderColor  = {default=536870911};
	__property BorderDownColor  = {default=536870911};
	__property BorderHotColor  = {default=536870911};
	__property BorderDropDownColor  = {default=8421504};
	__property ButtonsPerRow  = {default=1};
	__property Caption ;
	__property Color  = {default=-16777211};
	__property ColorTo  = {default=536870911};
	__property ColorDown ;
	__property ColorDownTo  = {default=536870911};
	__property ColorHot ;
	__property ColorHotTo  = {default=536870911};
	__property ColorDropDown ;
	__property ColorDropDownTo  = {default=536870911};
	__property AnsiString Characters = {read=FCharacters, write=SetCharacters};
	__property Graphics::TFont* CharFont = {read=FCharFont, write=SetCharFont};
	__property DropDownButton  = {default=0};
	__property Glyph ;
	__property GlyphHot ;
	__property GlyphDown ;
	__property ShowHint ;
	__property Style ;
	__property OnMouseEnter ;
	__property OnMouseLeave ;
	__property OnDropDown ;
	__property OnClick ;
	__property Classes::TNotifyEvent OnSelect = {read=FOnSelect, write=FOnSelect};
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TAdvCharacterSelector(HWND ParentWindow) : TAdvCustomSelector(ParentWindow) { }
	#pragma option pop
	
};


//-- var, const, procedure ---------------------------------------------------
static const Shortint MINBUTTONSIZE = 0x10;
static const Shortint TABLECELLSIZE = 0x18;
static const Shortint MAJ_VER = 0x1;
static const Shortint MIN_VER = 0x3;
static const Shortint REL_VER = 0x3;
static const Shortint BLD_VER = 0x0;

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

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