anchor.diff:      if not fWidgList.widget[i].isDockable then continue;
       if DockMaster.GetAnchorSite(fWidgList.widget[i]).WindowState = wsMinimized then
         DockMaster.GetAnchorSite(fWidgList.widget[i]).Close
  -    else if DockMaster.GetAnchorSite(fWidgList.widget[i]).SiteType = adhstNone then
  +    else if not DockMaster.GetAnchorSite(fWidgList.widget[i]).HasParent then
         DockMaster.GetAnchorSite(fWidgList.widget[i]).Close;
     end;
     //
  
positive.code: 
  procedure TCEMainForm.InitDocking;
  var
    i: NativeInt;
    aManager: TAnchorDockManager;
  begin
    DockMaster.MakeDockSite(Self, [akBottom], admrpChild);
    DockMaster.OnShowOptions := @ShowAnchorDockOptions;
    DockMaster.HeaderStyle := adhsPoints;
    DockMaster.HideHeaderCaptionFloatingControl := true;
  
    if DockManager is TAnchorDockManager then begin
      aManager:=TAnchorDockManager(DockManager);
      aManager.PreferredSiteSizeAsSiteMinimum:=false;
    end;
    Height := 0;
  
    for i := 0 to fWidgList.Count-1 do
    begin
      if not fWidgList.widget[i].isDockable then continue;
      DockMaster.MakeDockable(fWidgList.widget[i], not fileExists(getCoeditDocPath + 'docking.xml'));
      DockMaster.GetAnchorSite(fWidgList.widget[i]).Header.HeaderPosition := adlhpTop;
    end;
  
    DockMaster.ManualDock(DockMaster.GetAnchorSite(fEditWidg), DockMaster.GetSite(Self), alBottom);
    DockMaster.ManualDock(DockMaster.GetAnchorSite(fMesgWidg), DockMaster.GetSite(Self), alBottom);
    DockMaster.ManualDock(DockMaster.GetAnchorSite(fStExpWidg), DockMaster.GetSite(Self), alLeft);
    DockMaster.ManualDock(DockMaster.GetAnchorSite(fFindWidg),
      DockMaster.GetAnchorSite(fStExpWidg), alBottom, fStExpWidg);
    width := width - fProjWidg.Width;
    DockMaster.ManualDock(DockMaster.GetAnchorSite(fProjWidg), DockMaster.GetSite(Self), alRight);
    DockMaster.ManualDock(DockMaster.GetAnchorSite(fPrjCfWidg),
      DockMaster.GetAnchorSite(fProjWidg), alBottom, fProjWidg);
    DockMaster.GetAnchorSite(fEditWidg).Header.HeaderPosition := adlhpTop;
  
    DockMaster.GetAnchorSite(fExplWidg).Close;
    DockMaster.GetAnchorSite(fLibMWidg).Close;
    DockMaster.GetAnchorSite(fTlsEdWidg).Close;
    LoadDocking;
  end;
  
  procedure TCEMainForm.InitSettings;
  
negative.code:   if not Visible then exit;
    //
    if WindowState = wsMinimized then WindowState := wsNormal;
    // does not save minimized/undocked windows to prevent bugs
    for i:= 0 to fWidgList.Count-1 do
    begin
      if not fWidgList.widget[i].isDockable then continue;
      if DockMaster.GetAnchorSite(fWidgList.widget[i]).WindowState = wsMinimized then
        DockMaster.GetAnchorSite(fWidgList.widget[i]).Close
      else if not DockMaster.GetAnchorSite(fWidgList.widget[i]).HasParent then
        DockMaster.GetAnchorSite(fWidgList.widget[i]).Close;
    end;
    //
  