toolpanels.hpp

TMS component pack v4.2 for delphi

	__fastcall virtual TAdvToolPanelTab(Classes::TComponent* AOwner);
	__fastcall virtual ~TAdvToolPanelTab(void);
	void __fastcall UpdatePanels(int Index);
	virtual void __fastcall Loaded(void);
	virtual void __fastcall CreateWnd(void);
	virtual void __fastcall SetBounds(int ALeft, int ATop, int AWidth, int AHeight);
	DYNAMIC void __fastcall DockOver(Controls::TDragDockObject* Source, int X, int Y, Controls::TDragState State, bool &Accept);
	DYNAMIC void __fastcall DockDrop(Controls::TDragDockObject* Source, int X, int Y);
	void __fastcall RemovePanel(TAdvToolPanel* APanel);
	void __fastcall InsertPanel(TAdvToolPanel* APanel);
	void __fastcall UpdatePanel(TAdvToolPanel* APanel);
	void __fastcall UnHidePanel(TAdvToolPanel* APanel);
	void __fastcall UnHidePanels(void);
	void __fastcall RollIn(TAdvToolPanel* APanel);
	void __fastcall RollOut(TAdvToolPanel* APanel);
	int __fastcall PanelsInTab(void);
	TAdvToolPanel* __fastcall CreatePanel(void);
	__property TToolPanels* Panels = {read=FPanels, write=FPanels};
	void __fastcall NextPanel(void);
	void __fastcall PrevPanel(void);
	int __fastcall PanelIndex(TAdvToolPanel* APanel);
	TAdvToolPanel* __fastcall PanelByName(AnsiString AName);
	void __fastcall SaveState(void);
	void __fastcall RestoreState(void);
	int __fastcall NumPanelsLocked(void);
	
__published:
	__property Alignment  = {default=2};
	__property bool AutoDock = {read=FAutoDock, write=SetAutoDock, default=1};
	__property TAutoOpenCloseSpeed AutoOpenCloseSpeed = {read=FAutoOpenCloseSpeed, write=FAutoOpenCloseSpeed, default=1};
	__property bool AutoOpenOnMouseEnter = {read=FAutoOpenOnMouseEnter, write=FAutoOpenOnMouseEnter, default=1};
	__property bool AutoThemeAdapt = {read=FAutoThemeAdapt, write=FAutoThemeAdapt, default=0};
	__property Color  = {default=-16777201};
	__property Graphics::TColor ColorTo = {read=FColorTo, write=SetColorTo, default=536870911};
	__property Font ;
	__property Hint ;
	__property Controls::TImageList* Images = {read=FImages, write=FImages};
	__property TToolPanelGlyphs* PanelGlyphs = {read=FPanelGlyphs, write=FPanelGlyphs};
	__property ParentFont  = {default=1};
	__property TPanelPersistence* Persist = {read=FPersist, write=FPersist};
	__property PopupMenu ;
	__property TPanelPosition Position = {read=FPosition, write=SetPosition, nodefault};
	__property TSlideSpeed SlideSpeed = {read=FSlideSpeed, write=FSlideSpeed, default=1};
	__property TToolPanelStyle Style = {read=FStyle, write=SetStyle, default=0};
	__property Graphics::TColor TabBorderColor = {read=FTabBorderColor, write=SetTabBorderColor, default=8421504};
	__property Graphics::TColor TabColor = {read=FTabColor, write=SetTabColor, default=-16777201};
	__property Graphics::TColor TabColorTo = {read=FTabColorTo, write=SetTabColorTo, default=536870911};
	__property Graphics::TColor TabHoverColor = {read=FTabHoverColor, write=FTabHoverColor, default=536870911};
	__property Graphics::TColor TabHoverColorTo = {read=FTabHoverColorTo, write=FTabHoverColorTo, default=536870911};
	__property int TabWidth = {read=FTabWidth, write=SetTabWidth, default=23};
	__property Graphics::TBitmap* TabGlyph = {read=FTabGlyph, write=SetTabGlyph};
	__property AnsiString Version = {read=GetVersion, write=SetVersion};
	__property OnDockOver ;
	__property OnDockDrop ;
	__property OnMouseDown ;
	__property OnMouseUp ;
	__property OnMouseMove ;
	__property OnKeyDown ;
	__property OnKeyUp ;
	__property OnKeyPress ;
	__property TTabEvent OnTabEnter = {read=FOnTabEnter, write=FOnTabEnter};
	__property TTabEvent OnTabLeave = {read=FOnTabLeave, write=FOnTabLeave};
	__property TTabEvent OnTabLeftClick = {read=FOnTabLeftClick, write=FOnTabLeftClick};
	__property TTabEvent OnTabRightClick = {read=FOnTabRightClick, write=FOnTabRightClick};
	__property TTabEvent OnTabSlideOut = {read=FOnTabSlideOut, write=FOnTabSlideOut};
	__property TTabEvent OnTabSlideIn = {read=FOnTabSlideIn, write=FOnTabSlideIn};
	__property TTabEvent OnTabSlideOutDone = {read=FOnTabSlideOutDone, write=FOnTabSlideOutDone};
	__property TTabEvent OnTabSlideInDone = {read=FOnTabSlideInDone, write=FOnTabSlideInDone};
	__property TTabEvent OnTabHide = {read=FOnTabHide, write=FOnTabHide};
	__property TAllowTabEvent OnAllowTabHide = {read=FOnAllowTabHide, write=FOnAllowTabHide};
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TAdvToolPanelTab(HWND ParentWindow) : Extctrls::TCustomPanel(ParentWindow) { }
	#pragma option pop
	
private:
	void *__ITMSStyle;	/* Advstyleif::ITMSStyle */
	
public:
	operator ITMSStyle*(void) { return (ITMSStyle*)&__ITMSStyle; }
	
};


typedef void __fastcall (__closure *TOnCaptionButtonClick)(System::TObject* Sender, const Types::TRect &CaptionButtonRect);

class DELPHICLASS TAdvToolPanelSections;
class DELPHICLASS TAdvToolPanelSection;
class PASCALIMPLEMENTATION TAdvToolPanelSections : public Classes::TCollection 
{
	typedef Classes::TCollection inherited;
	
public:
	TAdvToolPanelSection* operator[](int Index) { return Items[Index]; }
	
private:
	TAdvToolPanel* FOwner;
	HIDESBASE TAdvToolPanelSection* __fastcall GetItem(int Index);
	HIDESBASE void __fastcall SetItem(int Index, const TAdvToolPanelSection* Value);
	
protected:
	DYNAMIC Classes::TPersistent* __fastcall GetOwner(void);
	
public:
	__fastcall TAdvToolPanelSections(TAdvToolPanel* AOwner);
	HIDESBASE TAdvToolPanelSection* __fastcall Add(void);
	HIDESBASE TAdvToolPanelSection* __fastcall Insert(int Index);
	__property TAdvToolPanelSection* Items[int Index] = {read=GetItem, write=SetItem/*, default*/};
public:
	#pragma option push -w-inl
	/* TCollection.Destroy */ inline __fastcall virtual ~TAdvToolPanelSections(void) { }
	#pragma option pop
	
};


class DELPHICLASS TSectionLayout;
#pragma option push -b-
enum TSectionCorners { scRectangle, scRoundLeft, scRoundRight, scRoundLeftRight };
#pragma option pop

class PASCALIMPLEMENTATION TSectionLayout : public Classes::TPersistent 
{
	typedef Classes::TPersistent inherited;
	
private:
	Graphics::TColor FCaptionColor;
	Graphics::TColor FCaptionColorTo;
	Graphics::TColor FBackGroundColor;
	Graphics::TColor FBackGroundColorTo;
	Graphics::TColor FBorderColor;
	int FBorderWidth;
	Classes::TNotifyEvent FOnChange;
	TGradientDirection FBackGroundGradientDir;
	TGradientDirection FCaptionGradientDirection;
	Graphics::TColor FItemFontColor;
	bool FUnderLineCaption;
	Graphics::TColor FItemHoverTextColor;
	bool FItemHoverUnderline;
	Graphics::TColor FCaptionFontColor;
	int FSpacing;
	int FIndent;
	bool FCaptionRounded;
	TSectionCorners FCorners;
	void __fastcall SetBackGroundColor(const Graphics::TColor Value);
	void __fastcall SetBackGroundColorTo(const Graphics::TColor Value);
	void __fastcall SetBorderColor(const Graphics::TColor Value);
	void __fastcall SetBorderWidth(const int Value);
	void __fastcall SetCaptionColor(const Graphics::TColor Value);
	void __fastcall SetCaptionColorTo(const Graphics::TColor Value);
	void __fastcall SetBackGroundGradientDir(const TGradientDirection Value);
	void __fastcall SetCaptionGradientDirection(const TGradientDirection Value);
	void __fastcall SetItemFontColor(const Graphics::TColor Value);
	void __fastcall SetUnderLineCaption(const bool Value);
	void __fastcall SetItemHoverTextColor(const Graphics::TColor Value);
	void __fastcall SetItemHoverUnderline(const bool Value);
	void __fastcall SetCaptionFontColor(const Graphics::TColor Value);
	void __fastcall SetIndent(const int Value);
	void __fastcall SetSpacing(const int Value);
	void __fastcall SetCaptionRounded(const bool Value);
	void __fastcall SetCorners(const TSectionCorners Value);
	
protected:
	void __fastcall Changed(void);
	
public:
	__fastcall TSectionLayout(void);
	__fastcall virtual ~TSectionLayout(void);
	
__published:
	__property Graphics::TColor CaptionColor = {read=FCaptionColor, write=SetCaptionColor, nodefault};
	__property Graphics::TColor CaptionColorTo = {read=FCaptionColorTo, write=SetCaptionColorTo, nodefault};
	__property Graphics::TColor CaptionFontColor = {read=FCaptionFontColor, write=SetCaptionFontColor, nodefault};
	__property bool CaptionRounded = {read=FCaptionRounded, write=SetCaptionRounded, nodefault};
	__property TSectionCorners Corners = {read=FCorners, write=SetCorners, nodefault};
	__property Graphics::TColor BackGroundColor = {read=FBackGroundColor, write=SetBackGroundColor, nodefault};
	__property Graphics::TColor BackGroundColorTo = {read=FBackGroundColorTo, write=SetBackGroundColorTo, nodefault};
	__property Graphics::TColor BorderColor = {read=FBorderColor, write=SetBorderColor, nodefault};
	__property int BorderWidth = {read=FBorderWidth, write=SetBorderWidth, nodefault};
	__property TGradientDirection CaptionGradientDir = {read=FCaptionGradientDirection, write=SetCaptionGradientDirection, default=0};
	__property TGradientDirection BackGroundGradientDir = {read=FBackGroundGradientDir, write=SetBackGroundGradientDir, default=0};
	__property int Indent = {read=FIndent, write=SetIndent, nodefault};
	__property int Spacing = {read=FSpacing, write=SetSpacing, nodefault};
	__property Graphics::TColor ItemFontColor = {read=FItemFontColor, write=SetItemFontColor, nodefault};
	__property Graphics::TColor ItemHoverTextColor = {read=FItemHoverTextColor, write=SetItemHoverTextColor, nodefault};
	__property bool ItemHoverUnderline = {read=FItemHoverUnderline, write=SetItemHoverUnderline, nodefault};
	__property bool UnderLineCaption = {read=FUnderLineCaption, write=SetUnderLineCaption, nodefault};
	__property Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
};


typedef void __fastcall (__closure *TNodeExpandEvent)(System::TObject* Sender, int SectionIndex);

typedef void __fastcall (__closure *TOnItemClick)(System::TObject* Sender, int SectionIndex, int ItemIndex);

#pragma option push -b-
enum TTPBackGroundPosition { bpTopLeft, bpTopRight, bpBottomLeft, bpBottomRight, bpTiled, bpStretched, bpCenter };
#pragma option pop

class PASCALIMPLEMENTATION TAdvToolPanel : public Extctrls::TCustomPanel 
{
	typedef Extctrls::TCustomPanel inherited;
	
private:
	int FImageIndex;
	TAdvToolPanelTab* FTab;
	int FOpenWidth;
	bool FMouseDown;
	bool FLocked;
	Graphics::TBitmap* FCloseGlyph;
	Graphics::TBitmap* FLockedGlyph;
	Graphics::TBitmap* FUnLockedGlyph;
	bool FCanSize;
	bool FHidden;
	AnsiString FCLoseHint;
	AnsiString FLockHint;
	AnsiString FUnlockHint;
	bool FActive;
	Graphics::TColor FFocusCaptionColor;
	Graphics::TColor FFocusCaptionFontColor;
	Graphics::TColor FNoFocusCaptionColor;
	Graphics::TColor FNoFocusCaptionFontColor;
	bool FDocking;
	bool FShowCaption;
	bool FAllowDocking;
	bool FRestored;
	AnsiString FTabName;
	bool FShowClose;
	bool FShowLock;
	bool FForceResize;
	bool FAutoLock;
	Graphics::TColor FNoFocusCaptionColorTo;
	Graphics::TColor FFocusCaptionColorTo;
	TGradientDirection FCaptionGradientDirection;
	bool FShowCaptionBorder;
	bool FDockDots;
	bool FCaptionButton;
	TOnCaptionButtonClick FOnCaptionBtnClick;
	bool FButton3D;
	Graphics::TColor FHoverButtonColor;
	Graphics::TColor FDownButtonColor;
	Graphics::TColor FHoverButtonColorTo;
	Graphics::TColor FDownButtonColorTo;
	TAdvToolPanelSections* FSections;
	bool FSizing;
	int FSizeSection;
	int FSizeHeight;
	int FSizeY;
	TSectionLayout* FSectionLayout;
	Graphics::TColor FColorTo;
	TGradientDirection FGradientDirection;
	Controls::TImageList* FSectionImages;
	TNodeExpandEvent FOnNodeCollapse;
	TNodeExpandEvent FOnNodeExpand;
	bool FOldFloating;
	int FHoverSectionIndex;
	int FHoverSectionItemIndex;
	#pragma pack(push,1)
	Types::TRect FHoverSectionItemRect;
	#pragma pack(pop)
	TOnItemClick FOnItemClick;
	Graphics::TBitmap* FBackGround;
	TTPBackGroundPosition FBackGroundPosition;
	TToolPanelStyle FStyle;
	bool FBackgroundTransparent;
	MESSAGE void __fastcall WMEXITSIZEMOVE(Messages::TMessage &Msg);
	MESSAGE void __fastcall WMENTERSIZEMOVE(Messages::TMessage &Msg);
	HIDESBASE MESSAGE void __fastcall WMNCHitTest(Messages::TWMNCHitTest &Msg);
	HIDESBASE MESSAGE void __fastcall WMEraseBkGnd(Messages::TMessage &Message);
	HIDESBASE MESSAGE void __fastcall CMMouseLeave(Messages::TMessage &Message);
	HIDESBASE MESSAGE void __fastcall CMHintShow(Messages::TMessage &Msg);
	HIDESBASE MESSAGE void __fastcall CMDesignHitTest(Messages::TWMMouse &Msg);
	HIDESBASE MESSAGE void __fastcall WMSetCursor(Messages::TWMSetCursor &Message);
	void __fastcall SetLocked(const bool Value);
	AnsiString __fastcall GetCaptionEx();
	void __fastcall SetCaptionEx(const AnsiString Value);
	void __fastcall SetImageIndex(const int Value);
	void __fastcall SetHidden(const bool Value);
	bool __fastcall GetIsVisible(void);
	void __fastcall SetFocusCaptionColor(const Graphics::TColor Value);
	void __fastcall SetFocusCaptionFontColor(const Graphics::TColor Value);
	void __fastcall SetNoFocusCaptionColor(const Graphics::TColor Value);
	void __fastcall SetNoFocusCaptionFontColor(const Graphics::TColor Value);
	void __fastcall SetDocking(const bool Value);
	void __fastcall SetShowCaption(const bool Value);
	void __fastcall SetOpenWidth(const int Value);
	void __fastcall SetShowClose(const bool Value);
	void __fastcall SetShowLock(const bool Value);
	void __fastcall SetCaptionGradientDirection(const TGradientDirection Value);
	void __fastcall SetFocusCaptionColorTo(const Graphics::TColor Value);
	void __fastcall SetNoFocusCaptionColorTo(const Graphics::TColor Value);
	void __fastcall SetShowCaptionBorder(const bool Value);
	void __fastcall SetDockDots(const bool Value);
	void __fastcall SetCaptionButton(const bool Value);
	void __fastcall CaptionButtonClick(const Types::TRect &CaptionBtnRect);
	void __fastcall SetColorTo(const Graphics::TColor Value);
	void __fastcall SetGradientDirection(const TGradientDirection Value);
	void __fastcall SectionLayoutChanged(System::TObject* Sender);
	Types::TRect __fastcall SectionRect(int SectionIndex, bool Actual);
	Types::TRect __fastcall NodeBtnRect(int SectionIndex);
	void __fastcall SetBackground(const Graphics::TBitmap* Value);
	void __fastcall SetBackGroundPosition(const TTPBackGroundPosition value);