aqdocking.hpp

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

	__property Aqdockingui::TaqTabOrientation Orientation = {read=FOrientation, write=SetOrientation, nodefault};
	__property Aqdockingbase::TaqBooleanValue ShowCloseButtonOnTabs = {read=FShowCloseButtonOnTabs, write=SetShowCloseButtonOnTabs, nodefault};
	__property Types::TRect TabAreaRect = {read=GetTabAreaRect};
	__property int TabCount = {read=GetTabCount, nodefault};
	__property int TabHeight = {read=GetTabHeight, nodefault};
public:
	/* TWinControl.CreateParented */ inline __fastcall TaqInsideContainer(HWND ParentWindow) : Aqdockingbase::TaqCustomDockingContainer(ParentWindow) { }
	
};


class DELPHICLASS TaqSizer;
class DELPHICLASS TaqDockingStyle;
class PASCALIMPLEMENTATION TaqSizer : public Aqdockingbase::TaqCustomSizer
{
	typedef Aqdockingbase::TaqCustomSizer inherited;
	
private:
	TaqDockingStyle* FStyle;
	
protected:
	__property TaqDockingStyle* Style = {read=FStyle};
	
public:
	__fastcall virtual TaqSizer(Aqdockingbase::TaqCustomDockingManager* ADockingManager);
public:
	/* TaqOwnedObject.Destroy */ inline __fastcall virtual ~TaqSizer(void) { }
	
};


class DELPHICLASS TaqSplitSizer;
class PASCALIMPLEMENTATION TaqSplitSizer : public TaqSizer
{
	typedef TaqSizer inherited;
	
protected:
	bool __fastcall CanRestoreChildren(TaqSplitContainer* AContainer);
	
public:
	virtual void __fastcall MaximizeChild(TaqSplitContainer* AContainer, Aqdockingbase::TaqCustomDockingControl* AChild) = 0 ;
	virtual void __fastcall RestoreChildren(TaqSplitContainer* AContainer) = 0 ;
	virtual void __fastcall ArrangeChildren(TaqSplitContainer* AContainer, int StartIndex, int EndIndex) = 0 ;
public:
	/* TaqSizer.Create */ inline __fastcall virtual TaqSplitSizer(Aqdockingbase::TaqCustomDockingManager* ADockingManager) : TaqSizer(ADockingManager) { }
	
public:
	/* TaqOwnedObject.Destroy */ inline __fastcall virtual ~TaqSplitSizer(void) { }
	
};


class DELPHICLASS TaqVerticalSizer;
class PASCALIMPLEMENTATION TaqVerticalSizer : public TaqSplitSizer
{
	typedef TaqSplitSizer inherited;
	
protected:
	virtual void __fastcall ResizeChildren(Aqdockingbase::TaqCustomDockingContainer* AContainer);
	
public:
	virtual void __fastcall MaximizeChild(TaqSplitContainer* AContainer, Aqdockingbase::TaqCustomDockingControl* AChild);
	virtual void __fastcall RestoreChildren(TaqSplitContainer* AContainer);
	virtual void __fastcall ArrangeChildren(TaqSplitContainer* AContainer, int StartIndex, int EndIndex);
public:
	/* TaqSizer.Create */ inline __fastcall virtual TaqVerticalSizer(Aqdockingbase::TaqCustomDockingManager* ADockingManager) : TaqSplitSizer(ADockingManager) { }
	
public:
	/* TaqOwnedObject.Destroy */ inline __fastcall virtual ~TaqVerticalSizer(void) { }
	
};


class DELPHICLASS TaqHorizontalSizer;
class PASCALIMPLEMENTATION TaqHorizontalSizer : public TaqSplitSizer
{
	typedef TaqSplitSizer inherited;
	
protected:
	virtual void __fastcall ResizeChildren(Aqdockingbase::TaqCustomDockingContainer* AContainer);
	
public:
	virtual void __fastcall MaximizeChild(TaqSplitContainer* AContainer, Aqdockingbase::TaqCustomDockingControl* AChild);
	virtual void __fastcall RestoreChildren(TaqSplitContainer* AContainer);
	virtual void __fastcall ArrangeChildren(TaqSplitContainer* AContainer, int StartIndex, int EndIndex);
public:
	/* TaqSizer.Create */ inline __fastcall virtual TaqHorizontalSizer(Aqdockingbase::TaqCustomDockingManager* ADockingManager) : TaqSplitSizer(ADockingManager) { }
	
public:
	/* TaqOwnedObject.Destroy */ inline __fastcall virtual ~TaqHorizontalSizer(void) { }
	
};


class DELPHICLASS TaqInsideSizer;
class PASCALIMPLEMENTATION TaqInsideSizer : public TaqSizer
{
	typedef TaqSizer inherited;
	
protected:
	virtual void __fastcall ResizeChildren(Aqdockingbase::TaqCustomDockingContainer* AContainer);
public:
	/* TaqSizer.Create */ inline __fastcall virtual TaqInsideSizer(Aqdockingbase::TaqCustomDockingManager* ADockingManager) : TaqSizer(ADockingManager) { }
	
public:
	/* TaqOwnedObject.Destroy */ inline __fastcall virtual ~TaqInsideSizer(void) { }
	
};


class DELPHICLASS TaqDockingFrame;
class PASCALIMPLEMENTATION TaqDockingFrame : public Aqdockingbase::TaqCustomDockingFrame
{
	typedef Aqdockingbase::TaqCustomDockingFrame inherited;
	
private:
	TaqDockingStyle* FStyle;
	
protected:
	virtual void __fastcall SetMover(const Aqdockingbase::TaqCustomMover* Value);
	__property TaqDockingStyle* Style = {read=FStyle};
	
public:
	__fastcall virtual TaqDockingFrame(Aqdockingbase::TaqCustomDockingManager* ADockingManager);
public:
	/* TaqCustomDockingFrame.Destroy */ inline __fastcall virtual ~TaqDockingFrame(void) { }
	
};


class DELPHICLASS TaqDocker;
class PASCALIMPLEMENTATION TaqDocker : public Aqdockingbase::TaqCustomDocker
{
	typedef Aqdockingbase::TaqCustomDocker inherited;
	
private:
	TaqDockingStyle* FStyle;
	
protected:
	virtual void __fastcall DockSplit(Aqdockingbase::TaqCustomDockingControl* Item, Aqdockingbase::TaqCustomDockingControl* Target, TaqSplitContainerClass ContainerClass, Aqdockingbase::TaqChildInsertOrder Order);
	virtual void __fastcall DockInside(Aqdockingbase::TaqCustomDockingControl* Item, Aqdockingbase::TaqChildInsertOrder Order);
	virtual void __fastcall DockVertical(Aqdockingbase::TaqCustomDockingControl* Item, Aqdockingbase::TaqCustomDockingControl* Target, Aqdockingbase::TaqChildInsertOrder Order, const Types::TRect &ItemRect);
	virtual void __fastcall DockHorizontal(Aqdockingbase::TaqCustomDockingControl* Item, Aqdockingbase::TaqCustomDockingControl* Target, Aqdockingbase::TaqChildInsertOrder Order, const Types::TRect &ItemRect);
	__property TaqDockingStyle* Style = {read=FStyle};
	
public:
	__fastcall virtual TaqDocker(Aqdockingbase::TaqCustomDockingManager* ADockingManager);
	virtual TaqDockingRegionType __fastcall GetDockingRegionType(const Types::TPoint &APoint) = 0 ;
	virtual unsigned __fastcall GetDockingZoneRgn(TaqDockingRegionType ARegion) = 0 ;
	virtual bool __fastcall HasDockingZone(TaqDockingRegionType ARegion) = 0 ;
	virtual Types::TRect __fastcall GetDockingRect(TaqDockingRegionType ARegion, Aqdockingbase::TaqCustomDockingControl* ADragControl) = 0 ;
	virtual unsigned __fastcall GetDockingFrameRgn(TaqDockingRegionType ARegion, Aqdockingbase::TaqCustomDockingControl* ADragControl) = 0 ;
	virtual void __fastcall DockItem2(TaqDockingRegionType Region, Aqdockingbase::TaqCustomDockingControl* Item, bool FocusItem = true);
	virtual void __fastcall DockItem(const Types::TPoint &P, Aqdockingbase::TaqCustomDockingControl* Item);
	__classmethod System::UnicodeString __fastcall RegionToStr(TaqDockingRegionType ARegion);
public:
	/* TaqOwnedObject.Destroy */ inline __fastcall virtual ~TaqDocker(void) { }
	
};


class DELPHICLASS TaqMover;
class PASCALIMPLEMENTATION TaqMover : public Aqdockingbase::TaqCustomMover
{
	typedef Aqdockingbase::TaqCustomMover inherited;
	
private:
	TaqDockingStyle* FStyle;
	Aqdockingbase::TaqCustomDockingFrame* FFrame;
	Aqdockingbase::TaqCustomDockingControl* FTarget;
	Aqdockingbase::TaqCustomDockingControl* FActualTarget;
	Aqdockingbase::TaqCustomDocker* FDocker;
	TaqDockingRegionType FRegion;
	void __fastcall SetFrame(Aqdockingbase::TaqCustomDockingFrame* AFrame);
	Aqdockingbase::TaqCustomDocker* __fastcall GetDockerByPos(const Types::TPoint &APoint);
	TaqInsideContainer* __fastcall GetInsideContainer(Aqdockingbase::TaqCustomDockingControl* AControl);
	
protected:
	virtual bool __fastcall CanDockTo(Aqdockingbase::TaqCustomDockingControl* DockTarget);
	virtual void __fastcall DoAfterDockDrop(const Types::TPoint &Coord);
	virtual void __fastcall DoBeforeDockDrop(void);
	virtual void __fastcall DoDockerChanging(Aqdockingbase::TaqCustomDockingControl* OldTarget, Aqdockingbase::TaqCustomDockingControl* NewTarget, Aqdockingbase::TaqCustomDockingControl* OldActualTarget, Aqdockingbase::TaqCustomDockingControl* NewActualTarget, TaqDockingRegionType OldRegion, TaqDockingRegionType NewRegion);
	virtual void __fastcall DoDragDock(Aqdockingbase::TaqCustomDockingControl* Target, const Types::TPoint &Coord, unsigned FrameRgn, System::UnicodeString &Info, bool &CanDock, bool &CanFloat);
	virtual void __fastcall DoEndDock(Aqdockingbase::TaqCustomDockingControl* Target, const Types::TPoint &Coord, bool Cancelled);
	virtual bool __fastcall DoDockOver(Aqdockingbase::TaqCustomDockingControl* Control, Aqdockingbase::TaqCustomDockingControl* Source, const Types::TPoint &Coord, Aqdockingbase::TaqDockOverState State);
	virtual void __fastcall DoDockZone(TaqDockingControl* Control, Aqdockingbase::TaqCustomDockingControl* Source, const Types::TPoint &Coord, TaqDockingRegionType &Region);
	virtual Aqdockingbase::TaqCustomDockingControl* __fastcall FindDockingControl(const Types::TPoint &Coord) = 0 ;
	virtual Aqdockingbase::TaqCustomDockingControl* __fastcall GetActualTargetByPos(Aqdockingbase::TaqCustomDockingControl* ADockTarget, const Types::TPoint &APoint);
	DYNAMIC void __fastcall EnterInsideContainer(TaqInsideContainer* AContainer, TaqDockingRegionType ARegion);
	DYNAMIC void __fastcall LeaveInsideContainer(TaqInsideContainer* AContainer);
	__property Aqdockingbase::TaqCustomDocker* Docker = {read=FDocker};
	__property Aqdockingbase::TaqCustomDockingControl* Target = {read=FTarget};
	__property Aqdockingbase::TaqCustomDockingControl* ActualTarget = {read=FActualTarget};
	__property TaqDockingStyle* Style = {read=FStyle};
	__property Aqdockingbase::TaqCustomDockingFrame* Frame = {read=FFrame};
	
public:
	__fastcall virtual TaqMover(Aqdockingbase::TaqCustomDockingManager* ADockingManager);
	virtual void __fastcall CalcDragInfo(const Types::TPoint &Coord, bool DockingDisabled, Aqdockingbase::TaqDockingFrameInfo &Info, bool &CanDock, bool &CanFloat);
	virtual void __fastcall StartDragging(void);
	virtual void __fastcall EndDragging(const Types::TPoint &Coord, const Types::TRect &Bounds);
	virtual void __fastcall CancelDragging(const Types::TPoint &Coord);
	__property TaqDockingRegionType Region = {read=FRegion, nodefault};
public:
	/* TaqOwnedObject.Destroy */ inline __fastcall virtual ~TaqMover(void) { }
	
};


class PASCALIMPLEMENTATION TaqDockingStyle : public Classes::TPersistent
{
	typedef Classes::TPersistent inherited;
	
private:
	TaqDockingManager* FDockingManager;
	Controls::TCursor FCursor;
	Aqdockingui::TaqTabOrientation FTabOrientation;
	void __fastcall SetCursor(const Controls::TCursor Value);
	
protected:
	virtual void __fastcall Initialize(TaqDockingManager* ADockingManager);
	virtual void __fastcall Finalize(void);
	virtual TaqDockingFrameClass __fastcall GetDockingFrameClass(void) = 0 ;
	virtual TaqSizerClass __fastcall GetSizerClass(Aqdockingbase::TaqCustomDockingControlClass DockClass);
	virtual TaqMoverClass __fastcall GetMoverClass(void) = 0 ;
	virtual TaqDockerClass __fastcall GetDockerClass(Aqdockingbase::TaqCustomDockingControlClass DockClass) = 0 ;
	virtual void __fastcall OnRegisterControl(Aqdockingbase::TaqCustomDockingControl* Control);
	
public:
	__fastcall virtual TaqDockingStyle(Classes::TComponent* AOwner);
	virtual void __fastcall Assign(Classes::TPersistent* Source);
	__property TaqDockingManager* DockingManager = {read=FDockingManager};
	
__published:
	__property Controls::TCursor Cursor = {read=FCursor, write=SetCursor, default=0};
	__property Aqdockingui::TaqTabOrientation TabOrientation = {read=FTabOrientation, write=FTabOrientation, nodefault};
public:
	/* TPersistent.Destroy */ inline __fastcall virtual ~TaqDockingStyle(void) { }
	
};


class DELPHICLASS TaqHiddenTabInfo;
class PASCALIMPLEMENTATION TaqHiddenTabInfo : public TaqTabInfo
{
	typedef TaqTabInfo inherited;
	
public:
	Aqdockingbase::TaqCustomDockingControl* Control;
	Aqdockingbase::TaqCustomDockingControl* Container;
public:
	/* TObject.Create */ inline __fastcall TaqHiddenTabInfo(void) : TaqTabInfo() { }
	/* TObject.Destroy */ inline __fastcall virtual ~TaqHiddenTabInfo(void) { }
	
};


class DELPHICLASS TaqHiddenTabInfoList;
class PASCALIMPLEMENTATION TaqHiddenTabInfoList : public Contnrs::TObjectList
{
	typedef Contnrs::TObjectList inherited;
	
public:
	TaqHiddenTabInfo* operator[](int Index) { return Items[Index]; }
	
private:
	TaqHiddenTabInfo* __fastcall GetItems(int Index);