aqdocking.hpp

AutomatedDocking Library 控件源代码修改 适合Delphi 2009 和C++ Builder 20009 使用。 修正汉字不能正确显示问题

	void __fastcall SetItems(int Index, const TaqHiddenTabInfo* Value);
	
public:
	__property TaqHiddenTabInfo* Items[int Index] = {read=GetItems, write=SetItems/*, default*/};
public:
	/* TObjectList.Create */ inline __fastcall TaqHiddenTabInfoList(void)/* overload */ : Contnrs::TObjectList() { }
	
public:
	/* TList.Destroy */ inline __fastcall virtual ~TaqHiddenTabInfoList(void) { }
	
};


class DELPHICLASS TaqDockingHideZone;
class DELPHICLASS TaqDockingSite;
class PASCALIMPLEMENTATION TaqDockingHideZone : public System::TObject
{
	typedef System::TObject inherited;
	
private:
	TaqHiddenTabInfoList* FTabs;
	TaqDockingSite* FDockingSite;
	Contnrs::TComponentList* FItems;
	Aqdockingui::TaqHideZoneOrientation FOrientation;
	TaqDockingHideZone* FPrevNeighbour;
	TaqDockingHideZone* FNextNeighbour;
	Aqdockingbase::TaqCustomDockingSite* FHideSite;
	Extctrls::TTimer* FShowTimer;
	Extctrls::TTimer* FHideTimer;
	Extctrls::TTimer* FShowingTimer;
	Extctrls::TTimer* FHidingTimer;
	int FItemIndexToShow;
	int FHideSize;
	System::Byte FSlideInterval;
	bool __fastcall GetVisible(void);
	int __fastcall GetTabHeight(void);
	TaqDockingManager* __fastcall GetDockingManager(void);
	bool __fastcall GetControlVisible(void);
	void __fastcall InternalShowControl(Aqdockingbase::TaqCustomDockingControl* AControl, bool AShowing, bool AImmediately);
	void __fastcall HandleMouseActivation(const Types::TRect &R, int X, int Y, bool Immediately);
	void __fastcall DoShowTimerTimer(System::TObject* Sender);
	void __fastcall DoHideTimerTimer(System::TObject* Sender);
	void __fastcall DoShowingTimerTimer(System::TObject* Sender);
	void __fastcall DoHidingTimerTimer(System::TObject* Sender);
	void __fastcall StartPendingShow(int Index);
	void __fastcall StartPendingHide(void);
	void __fastcall DoShow(int Index);
	void __fastcall CancelPendingShow(void);
	void __fastcall CancelPendingHide(void);
	void __fastcall CancelPendingShowing(void);
	void __fastcall CancelPendingHiding(void);
	void __fastcall Invalidate(void);
	bool __fastcall GetHiding(void);
	bool __fastcall GetShowing(void);
	
protected:
	void __fastcall RegisterControl(Aqdockingbase::TaqCustomDockingControl* AControl);
	void __fastcall UnregisterControl(Aqdockingbase::TaqCustomDockingControl* AControl);
	void __fastcall ResetTabs(void);
	Types::TPoint __fastcall AddTabs(Aqdockingbase::TaqCustomDockingControl* AControl);
	void __fastcall RemoveTabs(Aqdockingbase::TaqCustomDockingControl* AControl);
	void __fastcall CalcHideZone(void);
	void __fastcall DrawHideZone(Graphics::TCanvas* Canvas, const Types::TRect &Rect);
	Types::TPoint __fastcall GetGroupIndexes(Aqdockingbase::TaqCustomDockingControl* Control)/* overload */;
	Types::TPoint __fastcall GetGroupIndexes(int Index)/* overload */;
	int __fastcall GetInitialHideSiteSize(Aqdockingbase::TaqCustomDockingControl* AControl);
	int __fastcall GetHideSiteSize(int MaxValue);
	void __fastcall SetInitialHideSiteSize(Aqdockingbase::TaqCustomDockingControl* AControl, int Value);
	int __fastcall GetItemIndex(Aqdockingbase::TaqCustomDockingControl* AControl)/* overload */;
	int __fastcall GetItemIndex(int Origin)/* overload */;
	virtual int __fastcall GetTabIndent(void) = 0 ;
	virtual Types::TRect __fastcall GetItemRect(const Types::TRect &R, int Origin, int Size, int Height) = 0 ;
	virtual Types::TRect __fastcall GetHideSiteBounds(void) = 0 ;
	virtual int __fastcall GetItemIndex(const Types::TRect &R, int X, int Y) = 0 /* overload */;
	virtual void __fastcall DoControlResized(Aqdockingbase::TaqCustomDockingControl* Sender) = 0 ;
	virtual int __fastcall GetSplitterSize(void) = 0 ;
	__property TaqDockingManager* DockingManager = {read=GetDockingManager};
	__property TaqDockingSite* DockingSite = {read=FDockingSite};
	__property Aqdockingbase::TaqCustomDockingSite* HideSite = {read=FHideSite};
	
public:
	__fastcall TaqDockingHideZone(TaqDockingSite* ADockingSite, Aqdockingui::TaqHideZoneOrientation AOrientation);
	__fastcall virtual ~TaqDockingHideZone(void);
	void __fastcall Clear(void);
	void __fastcall SetSelectedIndex(int Value);
	virtual Types::TRect __fastcall GetClientRect(const Types::TRect &ARect) = 0 ;
	virtual void __fastcall AdjustClientRect(Types::TRect &Rect) = 0 ;
	void __fastcall ShowControl(Aqdockingbase::TaqCustomDockingControl* AControl, bool AShowing, bool AImmediately);
	void __fastcall StopAnimate(void);
	virtual void __fastcall AdjustHideSiteBounds(void);
	void __fastcall MouseDown(Controls::TMouseButton Button, Classes::TShiftState Shift, const Types::TRect &R, int X, int Y);
	void __fastcall MouseUp(Controls::TMouseButton Button, Classes::TShiftState Shift, const Types::TRect &R, int X, int Y);
	void __fastcall MouseMove(Classes::TShiftState Shift, const Types::TRect &R, int X, int Y);
	void __fastcall DoControlChange(Aqdockingbase::TaqCustomDockingControl* Sender, Aqdockingbase::TaqDockingControlChange Change);
	void __fastcall DoActiveControlChange(void);
	void __fastcall Load(Aqdockingbase::TaqCustomDockingReader* Reader);
	void __fastcall Save(Aqdockingbase::TaqCustomDockingWriter* Writer);
	__property Aqdockingui::TaqHideZoneOrientation Orientation = {read=FOrientation, nodefault};
	__property System::Byte SlideInterval = {read=FSlideInterval, write=FSlideInterval, nodefault};
	__property bool Visible = {read=GetVisible, nodefault};
	__property TaqDockingHideZone* PrevNeighbour = {read=FPrevNeighbour};
	__property TaqDockingHideZone* NextNeighbour = {read=FNextNeighbour};
	__property bool ControlVisible = {read=GetControlVisible, nodefault};
	__property bool Showing = {read=GetShowing, nodefault};
	__property bool Hiding = {read=GetHiding, nodefault};
};


class DELPHICLASS TaqLeftDockingHideZone;
class PASCALIMPLEMENTATION TaqLeftDockingHideZone : public TaqDockingHideZone
{
	typedef TaqDockingHideZone inherited;
	
protected:
	virtual int __fastcall GetTabIndent(void);
	virtual Types::TRect __fastcall GetItemRect(const Types::TRect &R, int Origin, int Size, int Height);
	virtual int __fastcall GetItemIndex(const Types::TRect &R, int X, int Y)/* overload */;
	virtual Types::TRect __fastcall GetHideSiteBounds();
	virtual void __fastcall DoControlResized(Aqdockingbase::TaqCustomDockingControl* Sender);
	virtual int __fastcall GetSplitterSize(void);
	
public:
	virtual Types::TRect __fastcall GetClientRect(const Types::TRect &ARect);
	virtual void __fastcall AdjustClientRect(Types::TRect &Rect);
	virtual void __fastcall AdjustHideSiteBounds(void);
public:
	/* TaqDockingHideZone.Create */ inline __fastcall TaqLeftDockingHideZone(TaqDockingSite* ADockingSite, Aqdockingui::TaqHideZoneOrientation AOrientation) : TaqDockingHideZone(ADockingSite, AOrientation) { }
	/* TaqDockingHideZone.Destroy */ inline __fastcall virtual ~TaqLeftDockingHideZone(void) { }
	
	
/* Hoisted overloads: */
	
protected:
	inline int __fastcall  GetItemIndex(Aqdockingbase::TaqCustomDockingControl* AControl){ return TaqDockingHideZone::GetItemIndex(AControl); }
	inline int __fastcall  GetItemIndex(int Origin){ return TaqDockingHideZone::GetItemIndex(Origin); }
	
};


class DELPHICLASS TaqTopDockingHideZone;
class PASCALIMPLEMENTATION TaqTopDockingHideZone : public TaqDockingHideZone
{
	typedef TaqDockingHideZone inherited;
	
protected:
	virtual int __fastcall GetTabIndent(void);
	virtual Types::TRect __fastcall GetItemRect(const Types::TRect &R, int Origin, int Size, int Height);
	virtual int __fastcall GetItemIndex(const Types::TRect &R, int X, int Y)/* overload */;
	virtual Types::TRect __fastcall GetHideSiteBounds();
	virtual void __fastcall DoControlResized(Aqdockingbase::TaqCustomDockingControl* Sender);
	virtual int __fastcall GetSplitterSize(void);
	
public:
	virtual Types::TRect __fastcall GetClientRect(const Types::TRect &ARect);
	virtual void __fastcall AdjustClientRect(Types::TRect &Rect);
	virtual void __fastcall AdjustHideSiteBounds(void);
public:
	/* TaqDockingHideZone.Create */ inline __fastcall TaqTopDockingHideZone(TaqDockingSite* ADockingSite, Aqdockingui::TaqHideZoneOrientation AOrientation) : TaqDockingHideZone(ADockingSite, AOrientation) { }
	/* TaqDockingHideZone.Destroy */ inline __fastcall virtual ~TaqTopDockingHideZone(void) { }
	
	
/* Hoisted overloads: */
	
protected:
	inline int __fastcall  GetItemIndex(Aqdockingbase::TaqCustomDockingControl* AControl){ return TaqDockingHideZone::GetItemIndex(AControl); }
	inline int __fastcall  GetItemIndex(int Origin){ return TaqDockingHideZone::GetItemIndex(Origin); }
	
};


class DELPHICLASS TaqRightDockingHideZone;
class PASCALIMPLEMENTATION TaqRightDockingHideZone : public TaqDockingHideZone
{
	typedef TaqDockingHideZone inherited;
	
protected:
	virtual int __fastcall GetTabIndent(void);
	virtual Types::TRect __fastcall GetItemRect(const Types::TRect &R, int Origin, int Size, int Height);
	virtual int __fastcall GetItemIndex(const Types::TRect &R, int X, int Y)/* overload */;
	virtual Types::TRect __fastcall GetHideSiteBounds();
	virtual void __fastcall DoControlResized(Aqdockingbase::TaqCustomDockingControl* Sender);
	virtual int __fastcall GetSplitterSize(void);
	
public:
	virtual Types::TRect __fastcall GetClientRect(const Types::TRect &ARect);
	virtual void __fastcall AdjustClientRect(Types::TRect &Rect);
	virtual void __fastcall AdjustHideSiteBounds(void);
public:
	/* TaqDockingHideZone.Create */ inline __fastcall TaqRightDockingHideZone(TaqDockingSite* ADockingSite, Aqdockingui::TaqHideZoneOrientation AOrientation) : TaqDockingHideZone(ADockingSite, AOrientation) { }
	/* TaqDockingHideZone.Destroy */ inline __fastcall virtual ~TaqRightDockingHideZone(void) { }
	
	
/* Hoisted overloads: */
	
protected:
	inline int __fastcall  GetItemIndex(Aqdockingbase::TaqCustomDockingControl* AControl){ return TaqDockingHideZone::GetItemIndex(AControl); }
	inline int __fastcall  GetItemIndex(int Origin){ return TaqDockingHideZone::GetItemIndex(Origin); }
	
};


class DELPHICLASS TaqBottomDockingHideZone;
class PASCALIMPLEMENTATION TaqBottomDockingHideZone : public TaqDockingHideZone
{
	typedef TaqDockingHideZone inherited;
	
protected:
	virtual int __fastcall GetTabIndent(void);
	virtual Types::TRect __fastcall GetItemRect(const Types::TRect &R, int Origin, int Size, int Height);
	virtual int __fastcall GetItemIndex(const Types::TRect &R, int X, int Y)/* overload */;
	virtual Types::TRect __fastcall GetHideSiteBounds();
	virtual void __fastcall DoControlResized(Aqdockingbase::TaqCustomDockingControl* Sender);
	virtual int __fastcall GetSplitterSize(void);
	
public:
	virtual Types::TRect __fastcall GetClientRect(const Types::TRect &ARect);
	virtual void __fastcall AdjustClientRect(Types::TRect &Rect);
	virtual void __fastcall AdjustHideSiteBounds(void);
public:
	/* TaqDockingHideZone.Create */ inline __fastcall TaqBottomDockingHideZone(TaqDockingSite* ADockingSite, Aqdockingui::TaqHideZoneOrientation AOrientation) : TaqDockingHideZone(ADockingSite, AOrientation) { }
	/* TaqDockingHideZone.Destroy */ inline __fastcall virtual ~TaqBottomDockingHideZone(void) { }
	
	
/* Hoisted overloads: */
	
protected:
	inline int __fastcall  GetItemIndex(Aqdockingbase::TaqCustomDockingControl* AControl){ return TaqDockingHideZone::GetItemIndex(AControl); }
	inline int __fastcall  GetItemIndex(int Origin){ return TaqDockingHideZone::GetItemIndex(Origin); }
	
};


typedef TMetaClass* TaqDockingStyleClass;

class PASCALIMPLEMENTATION TaqDockingSite : public Aqdockingbase::TaqParentedDockingSite
{
	typedef Aqdockingbase::TaqParentedDockingSite inherited;
	
private:
	Aqdockingutils::TaqWindowEventFilterEx* FParentEventsEx;
	Aqdockingbase::TaqCustomDockingControl* FWorkspaceControl;
	StaticArray<TaqDockingHideZone*, 4> FHideZones;
	Aquihelpers::TaqOrientations FAllowAutoHide;
	__classmethod TaqDockingSite* __fastcall FindDockSite(Classes::TComponent* Component);
	void __fastcall SetHideZoneNeighbours(void);
	void __fastcall SetAllowAutoHide(const Aquihelpers::TaqOrientations Value);
	void __fastcall ClearHideZones(void);
	TaqDockingHideZone* __fastcall GetHideZones(Aqdockingui::TaqHideZoneOrientation Index);
	void __fastcall WorkspaceControlUpdate(void);
	
protected:
	virtual void __fastcall CreateWnd(void);
	virtual void __fastcall SetParent(Controls::TWinControl* AParent);
	virtual void __fastcall Notification(Classes::TComponent* AComponent, Classes::TOperation Operation);
	virtual void __fastcall ShowControl(Controls::TControl* AControl);
	virtual void __fastcall AdjustClientRect(Types::TRect &Rect);
	DYNAMIC void __fastcall MouseDown(Controls::TMouseButton Button, Classes::TShiftState Shift, int X, int Y);
	DYNAMIC void __fastcall MouseUp(Controls::TMouseButton Button, Classes::TShiftState Shift, int X, int Y);
	DYNAMIC void __fastcall MouseMove(Classes::TShiftState Shift, int X, int Y);
	virtual void __fastcall Paint(void);
	DYNAMIC void __fastcall Resize(void);
	HIDESBASE MESSAGE void __fastcall CMMouseLeave(Messages::TMessage &Message);
	virtual void __fastcall RegisterHiddenControl(Aqdockingbase::TaqCustomDockingControl* AControl, Aqdockingui::TaqHideZoneOrientation AOrientation);
	virtual void __fastcall UnregisterHiddenControl(Aqdockingbase::TaqCustomDockingControl* AControl);
	virtual void __fastcall ShowDockingControl(Aqdockingbase::TaqCustomDockingControl* AControl, bool Showing, bool Immediately = false);
	virtual bool __fastcall CanAutoHideItem(Aqdockingbase::TaqCustomDockingControl* AItem);
	virtual bool __fastcall CanUndoAutoHideItem(Aqdockingbase::TaqCustomDockingControl* AItem);