TGlassDockMaster

type TGlassDockMaster = class(TComponent)

protected

  fCloseBtnReferenceCount: Integer;

  fCloseBtnBitmap: TBitmap;

  fMinimizeBtnReferenceCount: Integer;

  fMinimizeBtnBitmap: TBitmap;

  function DoCreateControl();

  procedure AutoSizeAllHeaders();

  procedure CreateCloseButtonBitmap; virtual;

  procedure CreateMinimizeButtonBitmap; virtual;

  procedure DisableControlAutoSizing();

  procedure FreeCloseButtonBitmap; virtual;

  procedure FreeMinimizeButtonBitmap; virtual;

  procedure InvalidateHeaders;

  procedure Notification(); override;

  procedure SetHeaderAlignLeft();

  procedure SetHeaderAlignTop();

  procedure SetHeaderButtonSize();

  procedure SetShowHeader();

  procedure SetShowHeaderCaption();

  procedure SetShowHeaderCloseButton();

  procedure SetHideHeaderCaptionFloatingControl();

  procedure SetSplitterWidth();

  procedure SetSplitterColor();

  procedure OnIdle();

  procedure StartHideOverlappingTimer;

  procedure StopHideOverlappingTimer;

  procedure AsyncSimplify();

public

  function GetCloseBtnResName(); virtual;

  function GetMinimizeBtnResName(); virtual;

  procedure ShowOverlappingForm;

  procedure HideOverlappingForm();

  constructor Create(); override;

  destructor Destroy; override;

  function FullRestoreLayout();

  function ControlCount;

  property Controls []: TControl; [r]

  function IndexOfControl();

  function FindControl();

  function IsMinimizedControl();

  function IsSite();

  function IsAnchorSite();

  function IsCustomSite();

  function GetSite();

  function GetAnchorSite();

  function GetControl();

  function IsFloating();

  function GetPopupMenu;

  function AddPopupMenuItem(); virtual;

  function AddRemovePopupMenuItem(); virtual;

  procedure MakeDockable();

  procedure MakeDockSite();

  procedure MakeDockPanel();

  procedure MakeVisible();

  function ShowControl();

  procedure CloseAll;

  function IsMinimazeForm();

  procedure UnMinimazeForm();

  procedure SaveAllToFile();

  function LoadAllFromFile();

  procedure SaveAllToConfig();

  function LoadAllFromConfig();

  function ConfigIsEmpty();

  procedure SaveLayoutToConfig();

  function LoadLayoutFromConfig();

  procedure SaveSettingsToConfig();

  procedure LoadSettingsFromConfig();

  procedure SaveMainLayoutToTree();

  procedure SaveSiteLayoutToTree();

  function CreateRestoreLayout();

  property RestoreLayouts: TGlassDockRestoreLayouts; [rw]

  property Restoring: Boolean; [rw]

  property IdleConnected: Boolean; [rw]

  procedure LoadDefaultSettings;

  procedure LoadSettings();

  procedure SaveSettings();

  function SettingsAreEqual();

  procedure ResetSplitters;

  procedure ManualFloat();

  procedure ManualDock();

  function ManualEnlarge();

  procedure BeginUpdate;

  procedure EndUpdate;

  function IsReleasing();

  procedure NeedSimplify();

  procedure NeedFree();

  procedure SimplifyPendingLayouts;

  function AutoFreedIfControlIsRemoved();

  function CreateSite();

  function CreateSplitter();

  property QueueSimplify: Boolean; [rw]

  property OnCreateControl: TGDMCreateControlEvent; [rw]

  property OnStartExecuteDock: TGDMStartExecuteDock; [rw]

  property OnEndExecuteDock: TGDMEndExecuteDock; [rw]

  property OnStartExecuteUnDock: TGDMStartExecuteUnDock; [rw]

  property OnEndExecuteUnDock: TGDMEndExecuteUnDock; [rw]

  property OnCanHaveMinimazeButton: TGDMCanHaveMinimazeButton; [rw]

  property OnShowOptions: TGDMShowDockMasterOptionsEvent; [rw]

  property OnOptionsChanged: TNotifyEvent; [rw]

  property DragTreshold: Integer; [rw]

  property DockOutsideMargin: Integer; [rw]

  property DockParentMargin: Integer; [rw]

  property PageAreaInPercent: Integer; [rw]

  property ShowHeader: Boolean; [rw]

  property ShowMenuItemShowHeader: Boolean; [rw]

  property ShowHeaderCaption: Boolean; [rw]

  property ShowHeaderCloseButton: Boolean; [rw]

  property HideHeaderCaptionFloatingControl: Boolean; [rw]

  property HeaderAlignTop: Integer; [rw]

  property HeaderAlignLeft: Integer; [rw]

  property HeaderButtonSize: Integer; [rw]

  property HeaderHint: string; [rw]

  property HeaderColor: TColor; [rw]

  property HeaderBorderColor: TColor; [rw]

  property HeaderFontColor: TColor; [rw]

  property HeaderIconsGroup: Integer; [rw]

  property DockSitesCanBeMinimized: Boolean; [rw]

  property SplitterWidth: Integer; [rw]

  property SplitterColor: TColor; [rw]

  property ScaleOnResize: Boolean; [rw]

  property AllowDragging: Boolean; [rw]

  property MultiLinePages: Boolean; [rw]

  property OptionsChangeStamp: Int64; [r]

  procedure IncreaseOptionsChangeStamp;

  property SplitterClass: TGlassDockSplitterClass; [rw]

  property SiteClass: TGlassDockHostSiteClass; [rw]

  property ManagerClass: TGlassDockManagerClass; [rw]

  property HeaderClass: TGlassDockHeaderClass; [rw]

  property PageControlClass: TGlassDockPageControlClass; [rw]

  property PageClass: TGlassDockPageClass; [rw]

  property MainDockForm: TCustomForm; [rw]

end;

TGlassDockMaster

TObject