Changeset 193 for Docking/CoolDocking/UCDClient.pas

Timestamp:

Mar 11, 2011, 10:57:39 AM (14 years ago)

Author:

george

Message:

• Fixed: Infinite loop in TCDManager SetVisible method.

File:

• Docking/CoolDocking/UCDClient.pas (modified) (3 diffs)

Docking/CoolDocking/UCDClient.pas

@@ -11 +11 @@
   Buttons, ExtCtrls, Contnrs, Forms, ComCtrls, Dialogs, Menus, FileUtil,
   UCDCustomize, DOM, XMLWrite, XMLRead, UCDCommon,
-  DateUtils, UCDManagerTabs, UCDManagerRegions, UCDManagerTabsPopup,
-  UCDManagerRegionsPopup, UCDClientPanel,
-  UCDPopupMenu, UCDManager;
+  DateUtils, UCDClientPanel, UCDPopupMenu, UCDManager;
 
 const
@@ -43 +41 @@
 
 implementation
+
+uses
+  UCDManagerRegions;
 
 procedure Register;
@@ -91 +92 @@
       end;
       UseDockManager := True;
-      DockManager := TCDManager.Create(TWinControl(AOwner));
+      DockManager := TCDManagerRegions.Create(TWinControl(AOwner));
     end;
   end;