advtoolbar.hpp

TMSPack基本上涵盖了Delphi所有的基础控件

	Graphics::TBitmap* FMyImage;
	TPersistence* FPersistence;
	int FMinimumSize;
	bool FLockHeight;
	bool FPropertiesLoaded;
	bool FUseRunTimeHeight;
	HIDESBASE MESSAGE void __fastcall WMSize(Messages::TWMSize &Message);
	HIDESBASE MESSAGE void __fastcall CMVisibleChanged(Messages::TMessage &Message);
	HIDESBASE MESSAGE void __fastcall CMShowingChanged(Messages::TMessage &Message);
	void __fastcall OnPersistenceChange(System::TObject* Sender);
	void __fastcall SetToolBarStyler(const TCustomAdvToolBarStyler* Value);
	TDockAlign __fastcall GetAlign(void);
	HIDESBASE void __fastcall SetAlign(const TDockAlign Value);
	int __fastcall GetAdvToolBarCount(void);
	TAdvCustomToolBar* __fastcall GetAdvToolBars(int index);
	int __fastcall GetRowCount(void);
	void __fastcall SetPersistence(const TPersistence* Value);
	AnsiString __fastcall GetVersion();
	void __fastcall SetVersion(const AnsiString Value);
	void __fastcall SetMinimumSize(const int Value);
	Menus::TPopupMenu* __fastcall GetPopupMenuEx(void);
	void __fastcall SetPopupMenuEx(const Menus::TPopupMenu* Value);
	void __fastcall SetLockHeight(const bool Value);
	void __fastcall SetUseRunTimeHeight(const bool Value);
	
protected:
	void __fastcall UpdateMe(int PropID);
	virtual void __fastcall AlignControls(Controls::TControl* AControl, Types::TRect &ARect);
	virtual void __fastcall CreateWnd(void);
	virtual void __fastcall Loaded(void);
	virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation Operation);
	virtual void __fastcall SetParent(Controls::TWinControl* AParent);
	virtual void __fastcall Paint(void);
	Graphics::TBitmap* __fastcall GetMyImage(void);
	int __fastcall IsAllowedInAnyRow(TAdvCustomToolBar* aAdvToolBar);
	int __fastcall AddToolBar(TAdvCustomToolBar* aAdvToolBar);
	void __fastcall RemoveToolBar(TAdvCustomToolBar* aAdvToolBar);
	void __fastcall UpdateToolBarVisibility(TAdvCustomToolBar* aAdvToolBar);
	void __fastcall SetToolBarFullSize(TAdvCustomToolBar* aAdvToolBar);
	void __fastcall SetToolBarBounds(TAdvCustomToolBar* aAdvToolBar, int &ALeft, int &ATop, int &AWidth, int &AHeight);
	__property TRowCollection* Rows = {read=FRows};
	__property int OffSetX = {read=FOffSetX, default=1};
	__property int OffSetY = {read=FOffSetY, default=0};
	__property TDbgList* ToolBars = {read=FToolBars};
	
public:
	__fastcall virtual TAdvDockPanel(Classes::TComponent* AOwner);
	virtual void __fastcall CreateParams(Controls::TCreateParams &Params);
	__fastcall virtual ~TAdvDockPanel(void);
	virtual void __fastcall SetBounds(int ALeft, int ATop, int AWidth, int AHeight);
	void __fastcall SaveToolBarsPosition(void);
	void __fastcall LoadToolBarsPosition(void);
	int __fastcall GetVersionNr(void);
	void __fastcall ArrangeToolBars(void);
	__property int RowCount = {read=GetRowCount, nodefault};
	__property int AdvToolBarCount = {read=GetAdvToolBarCount, nodefault};
	__property TAdvCustomToolBar* AdvToolBars[int index] = {read=GetAdvToolBars};
	
__published:
	__property TDockAlign Align = {read=GetAlign, write=SetAlign, default=1};
	__property int MinimumSize = {read=FMinimumSize, write=SetMinimumSize, nodefault};
	__property bool LockHeight = {read=FLockHeight, write=SetLockHeight, nodefault};
	__property TPersistence* Persistence = {read=FPersistence, write=SetPersistence};
	__property Menus::TPopupMenu* PopupMenu = {read=GetPopupMenuEx, write=SetPopupMenuEx};
	__property TCustomAdvToolBarStyler* ToolBarStyler = {read=FToolBarStyler, write=SetToolBarStyler};
	__property bool UseRunTimeHeight = {read=FUseRunTimeHeight, write=SetUseRunTimeHeight, nodefault};
	__property AnsiString Version = {read=GetVersion, write=SetVersion};
	__property Visible  = {default=1};
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TAdvDockPanel(HWND ParentWindow) : Controls::TCustomControl(ParentWindow) { }
	#pragma option pop
	
};


class PASCALIMPLEMENTATION TRowCollection : public Classes::TCollection 
{
	typedef Classes::TCollection inherited;
	
public:
	TRowCollectionItem* operator[](int Index) { return Items[Index]; }
	
private:
	TAdvDockPanel* FOwner;
	Classes::TNotifyEvent FOnChange;
	TOnDeleteItemEvent FOnDeleteItem;
	int FOffSetY;
	int FOffSetX;
	void __fastcall SetParentSize(void);
	HIDESBASE TRowCollectionItem* __fastcall GetItem(int Index);
	HIDESBASE void __fastcall SetItem(int Index, const TRowCollectionItem* Value);
	
protected:
	void __fastcall DeleteMeIfEmpty(TRowCollectionItem* AItem);
	void __fastcall SetRowsPosition(void);
	void __fastcall SetToolBarFullSize(TAdvCustomToolBar* aAdvToolBar);
	void __fastcall UpdateToolBarVisibility(TAdvCustomToolBar* aAdvToolBar);
	void __fastcall ReArrangeAllToolBars(void);
	__property int OffSetX = {read=FOffSetX, default=2};
	__property int OffSetY = {read=FOffSetY, default=1};
	
public:
	__fastcall TRowCollection(TAdvDockPanel* AOwner);
	__property TRowCollectionItem* Items[int Index] = {read=GetItem, write=SetItem/*, default*/};
	HIDESBASE TRowCollectionItem* __fastcall Add(void);
	HIDESBASE TRowCollectionItem* __fastcall Insert(int Index);
	DYNAMIC Classes::TPersistent* __fastcall GetOwner(void);
	int __fastcall IsToolBarAlreadyAdded(TAdvCustomToolBar* aAdvToolBar);
	void __fastcall SetToolBarTopAndHeight(TAdvCustomToolBar* aAdvToolBar, int &ATop, int &AHeight);
	void __fastcall SetToolBarLeftAndWidth(TAdvCustomToolBar* aAdvToolBar, int &ALeft, int &AWidth);
	void __fastcall MoveToolBarToRow(TAdvCustomToolBar* aAdvToolBar, int ARowIndex);
	__property Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
	__property TOnDeleteItemEvent OnDeleteItem = {read=FOnDeleteItem, write=FOnDeleteItem};
public:
	#pragma option push -w-inl
	/* TCollection.Destroy */ inline __fastcall virtual ~TRowCollection(void) { }
	#pragma option pop
	
};


class DELPHICLASS TAdvCustomToolBarControl;
class DELPHICLASS TAdvQuickAccessToolBar;
class DELPHICLASS TAdvCustomQuickAccessToolBar;
class DELPHICLASS TAdvVistaButton;
class PASCALIMPLEMENTATION TAdvVistaButton : public Controls::TGraphicControl 
{
	typedef Controls::TGraphicControl inherited;
	
private:
	bool FMouseEnter;
	Classes::TNotifyEvent FOnMouseLeave;
	Classes::TNotifyEvent FOnMouseEnter;
	Advglowbutton::TGlowButtonAppearance* FAppearance;
	bool FTransparent;
	Advglowbutton::TButtonPosition FButtonPosition;
	bool FMouseDown;
	TScrollArrow FScrollArrow;
	TArrowStyle FArrowStyle;
	bool FDown;
	void __fastcall AppearanceChanged(System::TObject* Sender);
	HIDESBASE MESSAGE void __fastcall CMHintShow(Messages::TMessage &Message);
	HIDESBASE MESSAGE void __fastcall WMLButtonDblClk(Messages::TWMMouse &Message);
	HIDESBASE MESSAGE void __fastcall CMEnabledChanged(Messages::TMessage &Message);
	MESSAGE void __fastcall CMDialogChar(Messages::TWMKey &Message);
	HIDESBASE MESSAGE void __fastcall CMFontChanged(Messages::TMessage &Message);
	MESSAGE void __fastcall CMTextChanged(Messages::TMessage &Message);
	MESSAGE void __fastcall CMSysColorChange(Messages::TMessage &Message);
	MESSAGE void __fastcall WMEraseBkGnd(Messages::TWMEraseBkgnd &Message);
	HIDESBASE MESSAGE void __fastcall CMMouseEnter(Messages::TMessage &Message);
	HIDESBASE MESSAGE void __fastcall CMMouseLeave(Messages::TMessage &Message);
	void __fastcall SetAppearance(const Advglowbutton::TGlowButtonAppearance* Value);
	void __fastcall SetTransparent(const bool Value);
	void __fastcall SetButtonPosition(const Advglowbutton::TButtonPosition Value);
	void __fastcall SetScrollArrow(const TScrollArrow Value);
	void __fastcall SetArrowStyle(const TArrowStyle Value);
	void __fastcall SetDown(const bool Value);
	
protected:
	virtual void __fastcall SetParent(Controls::TWinControl* AParent);
	virtual void __fastcall Loaded(void);
	DYNAMIC void __fastcall MouseDown(Controls::TMouseButton Button, Classes::TShiftState Shift, int X, int Y);
	DYNAMIC void __fastcall MouseMove(Classes::TShiftState Shift, int X, int Y);
	DYNAMIC void __fastcall MouseUp(Controls::TMouseButton Button, Classes::TShiftState Shift, int X, int Y);
	virtual void __fastcall Paint(void);
	virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation AOperation);
	__property Advglowbutton::TGlowButtonAppearance* Appearance = {read=FAppearance, write=SetAppearance};
	__property bool Down = {read=FDown, write=SetDown, nodefault};
	__property Enabled  = {default=1};
	__property Font ;
	__property Advglowbutton::TButtonPosition Position = {read=FButtonPosition, write=SetButtonPosition, default=0};
	__property bool Transparent = {read=FTransparent, write=SetTransparent, default=0};
	__property TScrollArrow ScrollArrow = {read=FScrollArrow, write=SetScrollArrow, nodefault};
	__property TArrowStyle ArrowStyle = {read=FArrowStyle, write=SetArrowStyle, nodefault};
	__property Visible  = {default=1};
	__property OnClick ;
	__property OnDblClick ;
	__property OnMouseDown ;
	__property OnMouseMove ;
	__property OnMouseUp ;
	__property Classes::TNotifyEvent OnMouseEnter = {read=FOnMouseEnter, write=FOnMouseEnter};
	__property Classes::TNotifyEvent OnMouseLeave = {read=FOnMouseLeave, write=FOnMouseLeave};
	
public:
	__fastcall virtual TAdvVistaButton(Classes::TComponent* AOwner);
	__fastcall virtual ~TAdvVistaButton(void);
	DYNAMIC void __fastcall Click(void);
	virtual void __fastcall SetBounds(int ALeft, int ATop, int AWidth, int AHeight);
};


class DELPHICLASS TOptionSelectorWindow;
class DELPHICLASS TOptionSelectorPanel;
class PASCALIMPLEMENTATION TOptionSelectorPanel : public Extctrls::TCustomPanel 
{
	typedef Extctrls::TCustomPanel inherited;
	
private:
	Classes::TComponent* FOwner;
	Graphics::TColor FColorTo;
	TGradientDirection FGradientDirection;
	Graphics::TColor FWindowBorderColor;
	Classes::TNotifyEvent FOnShouldHide;
	int FMarginY;
	int FMarginX;
	TAdvCustomToolBar* FAdvToolBar;
	TAdvQuickAccessToolBar* FAdvQuickAccessToolBar;
	void __fastcall SetColorTo(const Graphics::TColor Value);
	void __fastcall SetGradientDirection(const TGradientDirection Value);
	void __fastcall SetWindowBorderColor(const Graphics::TColor Value);
	void __fastcall SetMarginX(const int Value);
	void __fastcall SetMarginY(const int Value);
	
protected:
	virtual void __fastcall Paint(void);
	DYNAMIC void __fastcall MouseMove(Classes::TShiftState Shift, int X, int Y);
	virtual int __fastcall GetVisibleHeight(void);
	virtual void __fastcall DoHide(void);
	__property Classes::TNotifyEvent OnShouldHide = {read=FOnShouldHide, write=FOnShouldHide};
	__property int MarginX = {read=FMarginX, write=SetMarginX, nodefault};
	__property int MarginY = {read=FMarginY, write=SetMarginY, nodefault};
	
public:
	__fastcall virtual TOptionSelectorPanel(Classes::TComponent* AOwner);
	
__published:
	__property Graphics::TColor ColorTo = {read=FColorTo, write=SetColorTo, default=536870911};
	__property Graphics::TColor WindowBorderColor = {read=FWindowBorderColor, write=SetWindowBorderColor, default=8421504};
	__property TGradientDirection GradientDirection = {read=FGradientDirection, write=SetGradientDirection, nodefault};
	__property TAdvCustomToolBar* AdvToolBar = {read=FAdvToolBar, write=FAdvToolBar};
	__property TAdvQuickAccessToolBar* AdvQuickAccessToolBar = {read=FAdvQuickAccessToolBar, write=FAdvQuickAccessToolBar};
public:
	#pragma option push -w-inl
	/* TCustomControl.Destroy */ inline __fastcall virtual ~TOptionSelectorPanel(void) { }
	#pragma option pop
	
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TOptionSelectorPanel(HWND ParentWindow) : Extctrls::TCustomPanel(ParentWindow) { }
	#pragma option pop
	
};


class PASCALIMPLEMENTATION TOptionSelectorWindow : public Forms::TCustomForm 
{
	typedef Forms::TCustomForm inherited;
	
private:
	TAdvCustomToolBar* FAdvToolBar;
	TOptionSelectorPanel* FOptionsPanel;
	bool FHideOnDeActivate;
	bool FShowAbove;
	Classes::TComponent* FOwner;
	Extctrls::TTimer* FHideTimer;
	bool FShowLeft;
	HIDESBASE MESSAGE void __fastcall WMActivate(Messages::TWMActivate &Message);
	HIDESBASE MESSAGE void __fastcall WMNCHitTest(Messages::TWMNCHitTest &Message);
	void __fastcall HideTimerOnTime(System::TObject* Sender);
	
protected:
	DYNAMIC void __fastcall Paint(void);
	HWND __fastcall GetParentWnd(void);
	virtual void __fastcall CreateParams(Controls::TCreateParams &Params);
	DYNAMIC void __fastcall DoHide(void);
	__property bool HideOnDeActivate = {read=FHideOnDeActivate, write=FHideOnDeActivate, nodefault};
	__property bool ShowAbove = {read=FShowAbove, write=FShowAbove, nodefault};
	__property bool ShowLeft = {read=FShowLeft, write=FShowLeft, default=0};
	
public:
	__fastcall virtual TOptionSelectorWindow(Classes::TComponent* AOwner);
	__fastcall virtual TOptionSelectorWindow(Classes::TComponent* AOwner, int Dummy);
	__fastcall virtual ~TOptionSelectorWindow(void);
	void __fastcall SetWindowSize(void);
	
__published:
	__property TAdvCustomToolBar* AdvToolBar = {read=FAdvToolBar, write=FAdvToolBar};
	__property TOptionSelectorPanel* OptionsPanel = {read=FOptionsPanel, wri