advnavbar.hpp

TMS component pack v4.2 for delphi

	void __fastcall SetBorderColor(const Graphics::TColor Value);
	void __fastcall SetCaptionFont(const Graphics::TFont* Value);
	void __fastcall SetSplitterColor(const Graphics::TColor Value);
	void __fastcall SetSplitterColorTo(const Graphics::TColor Value);
	void __fastcall SetStyle(const TAdvNavBarStyle Value);
	void __fastcall SetSectionColor(const Graphics::TColor Value);
	void __fastcall SetSectionColorTo(const Graphics::TColor Value);
	void __fastcall SetPopupIndicator(const bool Value);
	void __fastcall ThemeAdapt(void);
	void __fastcall SetDefaultTabPosition(const TDefaultTabPosition Value);
	int __fastcall GetDupIndex(int Index);
	int __fastcall GetDisplayIndex(int Index);
	AnsiString __fastcall GetVersion();
	void __fastcall SetVersion(const AnsiString Value);
	void __fastcall SetDownTextColor(const Graphics::TColor Value);
	void __fastcall SetHoverTextColor(const Graphics::TColor Value);
	void __fastcall SetSmallImages(const Imglist::TCustomImageList* Value);
	void __fastcall SetCollapsed(const bool Value);
	void __fastcall SetCollapsedCaption(const AnsiString Value);
	void __fastcall DrawCollapsedCaption(void);
	void __fastcall SetAllowCollaps(const bool Value);
	void __fastcall SetDownTabMirrorColor(const Graphics::TColor Value);
	void __fastcall SetDownTabMirrorColorTo(const Graphics::TColor Value);
	void __fastcall SetHoverTabMirrorColor(const Graphics::TColor Value);
	void __fastcall SetHoverTabMirrorColorTo(const Graphics::TColor Value);
	void __fastcall SetActiveMirrorColor(const Graphics::TColor Value);
	void __fastcall SetActiveMirrorColorTo(const Graphics::TColor Value);
	void __fastcall SetDefaultTabMirrorColor(const Graphics::TColor Value);
	void __fastcall SetDefaultTabMirrorColorTo(const Graphics::TColor Value);
	HIDESBASE MESSAGE void __fastcall WMSetCursor(Messages::TWMSetCursor &Msg);
	HIDESBASE MESSAGE void __fastcall CMHintShow(Forms::TCMHintShow &Msg);
	void __fastcall SetShowSplitter(const bool Value);
	
protected:
	virtual int __fastcall GetVersionNr(void);
	Types::TRect __fastcall CaptionTabRect(int Index);
	HIDESBASE MESSAGE void __fastcall CMDesignHitTest(Messages::TWMMouse &Msg);
	virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation AOperation);
	DYNAMIC void __fastcall MouseUp(Controls::TMouseButton Button, Classes::TShiftState Shift, int X, int Y);
	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);
	HIDESBASE MESSAGE void __fastcall CMMouseLeave(Messages::TMessage &Message);
	HIDESBASE MESSAGE void __fastcall WMEraseBkGnd(Messages::TMessage &Message);
	HIDESBASE MESSAGE void __fastcall WMSize(Messages::TWMSize &Message);
	virtual void __fastcall Paint(void);
	virtual void __fastcall Loaded(void);
	virtual void __fastcall CreateWnd(void);
	void __fastcall SetAdvNavBarPanelPosition(TAdvNavBarPanel* AAdvNavBarPanel);
	__property int CaptionTabHeight = {read=FCaptionTabHeight, write=SetCaptionTabHeight, nodefault};
	virtual Types::TRect __fastcall GetClientRect();
	void __fastcall InsertAdvNavBarPanel(TAdvNavBarPanel* Value);
	void __fastcall RemoveAdvNavBarPanel(TAdvNavBarPanel* Value);
	TAdvNavBarPanel* __fastcall GetPanel(int Index);
	int __fastcall GetPanelCount(void);
	virtual void __fastcall WndProc(Messages::TMessage &Message);
	void __fastcall UpdateList(void);
	virtual void __fastcall DoChange(void);
	virtual bool __fastcall CanResize(int &NewWidth, int &NewHeight);
	int __fastcall SplitterHeight(void);
	
public:
	__fastcall virtual TAdvNavBar(Classes::TComponent* Aowner);
	__fastcall virtual ~TAdvNavBar(void);
	virtual void __fastcall SetBounds(int ALeft, int ATop, int AWidth, int AHeight);
	virtual TAdvNavBarPanel* __fastcall CreatePanel(void);
	TAdvNavBarPanel* __fastcall AddPanel(void);
	TAdvNavBarPanel* __fastcall InsertPanel(int Index);
	void __fastcall RemovePanel(int Index);
	void __fastcall MovePanel(int FromIndex, int ToIndex);
	__property TAdvNavBarPanel* Panels[int Index] = {read=GetPanel};
	__property int PanelCount = {read=GetPanelCount, nodefault};
	__property bool DoEraseBkg = {read=FDoEraseBkg, write=FDoEraseBkg, nodefault};
	void __fastcall SelectNextPanel(void);
	void __fastcall SelectPreviousPanel(void);
	int __fastcall IndexOfTabAt(int X, int Y);
	int __fastcall IndexOfCaptionTabAt(int X, int Y);
	int __fastcall IndexOfBtnAt(int X, int Y);
	int __fastcall FindNextPanelIndex(int CurIndex, bool GoForward);
	TAdvNavBarPanel* __fastcall FindNextPanel(TAdvNavBarPanel* CurPanel, bool GoForward);
	__property TAdvNavBarPanel* ActivePanel = {read=FActivePanel, write=SetActivePanel};
	void __fastcall SetComponentStyle(Advstyleif::TTMSStyle AStyle);
	
__published:
	__property Align  = {default=0};
	__property Anchors  = {default=3};
	__property Graphics::TColor ActiveColor = {read=FActiveColor, write=SetActiveColor, default=-16777201};
	__property Graphics::TColor ActiveColorTo = {read=FActiveColorTo, write=SetActiveColorTo, default=536870911};
	__property Graphics::TColor ActiveMirrorColor = {read=FActiveMirrorColor, write=SetActiveMirrorColor, default=536870911};
	__property Graphics::TColor ActiveMirrorColorTo = {read=FActiveMirrorColorTo, write=SetActiveMirrorColorTo, default=536870911};
	__property int ActiveTabIndex = {read=GetActiveTabIndex, write=SetActiveTabIndex, nodefault};
	__property bool AllowCollaps = {read=FAllowCollaps, write=SetAllowCollaps, default=0};
	__property bool AutoThemeAdapt = {read=FAutoThemeAdapt, write=FAutoThemeAdapt, default=0};
	__property Graphics::TColor BorderColor = {read=FBorderColor, write=SetBorderColor, default=8421504};
	__property TBottomIconAlign BottomIconAlign = {read=FBottomIconAlign, write=SetBottomIconAlign, default=1};
	__property Graphics::TColor CaptionColor = {read=FCaptionColor, write=SetCaptionColor, default=8421504};
	__property Graphics::TColor CaptionColorTo = {read=FCaptionColorTo, write=SetCaptionColorTo, default=536870911};
	__property Graphics::TFont* CaptionFont = {read=FCaptionFont, write=SetCaptionFont};
	__property bool Collapsed = {read=FCollapsed, write=SetCollapsed, default=0};
	__property AnsiString CollapsedCaption = {read=FCollapsedCaption, write=SetCollapsedCaption};
	__property int CollapsedWidth = {read=FCollapsedWidth, write=FCollapsedWidth, default=32};
	__property Graphics::TColor CollapsedHoverColor = {read=FCollapsedHoverColor, write=FCollapsedHoverColor, default=-16777192};
	__property Graphics::TColor CollapsedHoverColorTo = {read=FCollapsedHoverColorTo, write=FCollapsedHoverColorTo, default=536870911};
	__property Graphics::TColor CollapsedDownColor = {read=FCollapsedDownColor, write=FCollapsedDownColor, default=12632256};
	__property Graphics::TColor CollapsedDownColorTo = {read=FCollapsedDownColorTo, write=FCollapsedDownColorTo, default=536870911};
	__property Constraints ;
	__property TGradientDirection DefaultGradientDirection = {read=FDefaultGradientDirection, write=SetDefaultGradientDirection, nodefault};
	__property Graphics::TColor DefaultTextColor = {read=FDefaultTextColor, write=SetDefaultTextColor, default=0};
	__property Graphics::TColor DefaultTabColor = {read=FDefaultTabColor, write=SetDefaultTabColor, default=16777215};
	__property Graphics::TColor DefaultTabColorTo = {read=FDefaultTabColorTo, write=SetDefaultTabColorTo, default=-16777201};
	__property Graphics::TColor DefaultTabMirrorColor = {read=FDefaultTabMirrorColor, write=SetDefaultTabMirrorColor, default=536870911};
	__property Graphics::TColor DefaultTabMirrorColorTo = {read=FDefaultTabMirrorColorTo, write=SetDefaultTabMirrorColorTo, default=536870911};
	__property TDefaultTabPosition DefaultTabPosition = {read=FDefaultTabPosition, write=SetDefaultTabPosition, default=1};
	__property Graphics::TColor DownTabColor = {read=FDownTabColor, write=SetDownTabColor, nodefault};
	__property Graphics::TColor DownTabColorTo = {read=FDownTabColorTo, write=SetDownTabColorTo, nodefault};
	__property Graphics::TColor DownTabMirrorColor = {read=FDownTabMirrorColor, write=SetDownTabMirrorColor, nodefault};
	__property Graphics::TColor DownTabMirrorColorTo = {read=FDownTabMirrorColorTo, write=SetDownTabMirrorColorTo, nodefault};
	__property Graphics::TColor DownTextColor = {read=FDownTextColor, write=SetDownTextColor, default=0};
	__property Font ;
	__property Graphics::TColor HoverTabColor = {read=FHoverTabColor, write=SetHoverTabColor, nodefault};
	__property Graphics::TColor HoverTabColorTo = {read=FHoverTabColorTo, write=SetHoverTabColorTo, nodefault};
	__property Graphics::TColor HoverTabMirrorColor = {read=FHoverTabMirrorColor, write=SetHoverTabMirrorColor, nodefault};
	__property Graphics::TColor HoverTabMirrorColorTo = {read=FHoverTabMirrorColorTo, write=SetHoverTabMirrorColorTo, nodefault};
	__property Graphics::TColor HoverTextColor = {read=FHoverTextColor, write=SetHoverTextColor, default=0};
	__property int MinClientHeight = {read=FMinClientHeight, write=SetMinClientHeight, default=60};
	__property Imglist::TCustomImageList* Images = {read=FImages, write=SetImages};
	__property bool PopupIndicator = {read=FPopupIndicator, write=SetPopupIndicator, default=1};
	__property PopupMenu ;
	__property Graphics::TColor SectionColor = {read=FSectionColor, write=SetSectionColor, nodefault};
	__property Graphics::TColor SectionColorTo = {read=FSectionColorTo, write=SetSectionColorTo, nodefault};
	__property ShowHint ;
	__property bool ShowSplitter = {read=FShowSplitter, write=SetShowSplitter, default=1};
	__property Imglist::TCustomImageList* SmallImages = {read=FSmallImages, write=SetSmallImages};
	__property int SplitterPosition = {read=FSplitterPosition, write=SetSplitterPosition, nodefault};
	__property Graphics::TColor SplitterColor = {read=FSplitterColor, write=SetSplitterColor, nodefault};
	__property Graphics::TColor SplitterColorTo = {read=FSplitterColorTo, write=SetSplitterColorTo, nodefault};
	__property TAdvNavBarStyle Style = {read=FStyle, write=SetStyle, default=0};
	__property Visible  = {default=1};
	__property AnsiString Version = {read=GetVersion, write=SetVersion};
	__property Classes::TNotifyEvent OnChange = {read=FOnChange, write=FOnChange};
	__property Classes::TNotifyEvent OnCollapsChange = {read=FOnCollapsChange, write=FOnCollapsChange};
	__property Classes::TNotifyEvent OnCollapsedClick = {read=FOnCollapsedClick, write=FOnCollapsedClick};
	__property TOnPanelActivate OnPanelActivate = {read=FOnTPanelActivate, write=FOnTPanelActivate};
	__property TSplitterMove OnSplitterMove = {read=FOnSplitterMove, write=FOnSplitterMove};
	__property Classes::TNotifyEvent OnPopupMenuClick = {read=FOnPopupMenuClick, write=FOnPopupMenuClick};
	__property OnMouseDown ;
	__property OnMouseMove ;
	__property OnMouseUp ;
	__property OnKeyDown ;
	__property OnKeyPress ;
	__property OnKeyUp ;
	__property OnClick ;
	__property OnDblClick ;
	__property OnDragDrop ;
	__property OnDragOver ;
	__property OnExit ;
	__property OnEnter ;
	__property OnStartDrag ;
	__property OnContextPopup ;
	__property OnResize ;
	__property OnCanResize ;
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TAdvNavBar(HWND ParentWindow) : Controls::TCustomControl(ParentWindow) { }
	#pragma option pop
	
private:
	void *__ITMSStyle;	/* Advstyleif::ITMSStyle */
	
public:
	operator ITMSStyle*(void) { return (ITMSStyle*)&__ITMSStyle; }
	
};


class PASCALIMPLEMENTATION TAdvNavBarPanel : public Extctrls::TCustomPanel 
{
	typedef Extctrls::TCustomPanel inherited;
	
private:
	TAdvNavBar* FAdvNavBar;
	Graphics::TColor FTextColor;
	int FImageIndex;
	int FPanelIndex;
	AnsiString FCaption;
	AnsiString FCollapsedCaption;
	Graphics::TColor FColorTo;
	TGradientDirection FGradientDirection;
	TAdvNavBarPanelSections* FSections;
	bool FSizing;
	int FSizeSection;
	int FSizeHeight;
	int FSizeY;
	bool FTabVisible;
	bool FSectionSizing;
	AnsiString FCaptionHint;
	Classes::TAlignment FCaptionAlignment;
	void __fastcall SetAdvNavBar(TAdvNavBar* Value);
	void __fastcall SetTextColor(const Graphics::TColor Value);
	AnsiString __fastcall GetCaption();
	void __fastcall SetCaption(const AnsiString Value);
	void __fastcall SetCollapsedCaption(const AnsiString Value);
	void __fastcall SetImageIndex(const int Value);
	void __fastcall SetFPanelIndex(const int Value);
	void __fastcall SetColorTo(const Graphics::TColor Value);
	void __fastcall SetGradientDirection(const TGradientDirection Value);
	HIDESBASE MESSAGE void __fastcall CMDesignHitTest(Messages::TWMMouse &Msg);
	HIDESBASE MESSAGE void __fastcall WMSetCursor(Messages::TWMSetCursor &Message);
	HIDESBASE MESSAGE void __fastcall WMSize(Messages::TWMSize &Message);
	bool __fastcall GetEnable(void);
	void __fastcall SetEnable(const bool Value);
	bool __fastcall GetTabVisible(void);
	void __fastcall SetTabVisible(const bool Value);
	AnsiString __fastcall GetAdjustedCaption();
	void __fastcall UpdateControlBounds(void);
	void __fastcall SetCaptionAlignment(const Classes::TAlignment Value);
	
protected:
	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);
	DYNAMIC void __fastcall MouseDown(Controls::TMouseButton Button, Classes::TShiftState Shift, int X, int Y);
	virtual void __fastcall ReadState(Classes::TReader* Reader);
	void __fastcall SetPosInAdvNavBar(void);
	virtual void __fastcall Paint(void);
	virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation AOperation);
	
public:
	__fastcall virtual TAdvNavBarPanel(Classes::TComponent* AOwner);
	__fastcall virtual ~TAdvNavBarPanel(void);
	virtual void __fastcall SetBounds(int ALeft, int ATop, int AWidth, int AHeight);
	__property TAdvNavBar* AdvNavBar = {read=FAdvNavBar, write=SetAdvNavBar};
	__property bool TabVisible = {read=GetTabVisible, write=SetTabVisible, nodefault};
	__property AnsiString AdjustedCaption = {read=GetAdjustedCaption};
	
__published:
	__property AnsiString Caption = {read=GetCaption, write=SetCaption};
	__property Classes::TAlignment CaptionAlignment = {read=FCaptionAlignment, write=SetCaptionAlignment, default=0};
	__property AnsiString CaptionHint = {read=FCaptionHint, write=FCaptionHint};
	__property AnsiString CollapsedCaption = {read=FCollapsedCaption, write=SetCollapsedCaption};
	__property Color  = {default=-16777201};
	__property Graphics::TColor ColorTo = {read=FColorTo, write=SetColorTo, default=536870911};
	__property TGradientDirection GradientDirection = {read=FGradientDirection, write=SetGradientDirection, default=0};
	__property Font ;
	__property Hint ;
	__property int ImageIndex = {read=FImageIndex, write=SetImageIndex, default=-1};
	__property int PanelIndex = {read=FPanelIndex, write=SetFPanelIndex, nodefault};
	__property PopupMenu ;
	__property TAdvNavBarPanelSections* Sections = {read=FSections, write=FSections};
	__property bool SectionSizing = {read=FSectionSizing, write=FSectionSizing, default=0};
	__property ShowHint ;
	__property Graphics::TColor TextColor = {read=FTextColor, write=SetTextColor, default=0};
	__property bool Enabled = {read=GetEnable, write=SetEnable, default=1};
	__property OnMouseDown ;
	__property OnMouseMove ;
	__property OnMouseUp ;
	__property OnKeyDown ;
	__property OnKeyPress ;
	__property OnKeyUp ;
	__property OnClick ;
	__property OnDblClick ;
	__property OnDragDrop ;
	__property OnDragOver ;
	__property OnExit ;
	__property OnEnter ;
	__property OnResize ;
	__property OnStartDrag ;
	__property OnContextPopup ;
public:
	#pragma option push -w-inl
	/* TWinControl.CreateParented */ inline __fastcall TAdvNavBarPanel(HWND ParentWindow) : Extctrls::TCustomPanel(ParentWindow) { }
	#pragma option pop
	
};


//-- var, const, procedure ---------------------------------------------------
static const Shortint CaptionHeight = 0x1b;
static const Shortint DefSplitterHeight = 0x7;
static const Shortint ScrollerWidth = 0x14;
static const Shortint FixedBtnWidth = 0x18;
static const Shortint SectionHeight = 0x10;
static const Shortint IndicatorWidth = 0x14;
static const Shortint DefCollapsedWidth = 0x20;
static const Shortint MAJ_VER = 0x1;
static const Shortint MIN_VER = 0x5;
static const Shortint REL_VER = 0x1;
static const Shortint BLD_VER = 0x1;

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

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