anchordocking: added lfm

git-svn-id: trunk@26320 -

.gitattributes

@@ -2778,6 +2778,7 @@ examples/anchordocking/anchordockpkg.pas svneol=native#text/plain
 examples/anchordocking/anchordockstorage.pas svneol=native#text/plain
 examples/anchordocking/anchordockstr.pas svneol=native#text/plain
 examples/anchordocking/design/ADLayoutDefault.xml svneol=native#text/plain
+examples/anchordocking/design/anchordockingdsgn.lfm svneol=native#text/plain
 examples/anchordocking/design/anchordockingdsgn.lpk svneol=native#text/plain
 examples/anchordocking/design/anchordockingdsgn.pas svneol=native#text/plain
 examples/anchordocking/design/registeranchordocking.pas svneol=native#text/plain

examples/anchordocking/anchordocking.pas

@@ -4509,7 +4509,6 @@ begin
     debugln(['TAnchorDockManager.InsertControl DockSite=nil Site="',DbgSName(Site),'" Control=',DbgSName(ADockObject.Control),' InsertAt=',dbgs(ADockObject.DropAlign),' Site.Bounds=',dbgs(Site.BoundsRect),' Control.Client=',dbgs(ADockObject.Control.ClientRect),' Parent=',DbgSName(ADockObject.Control.Parent)]);
     Site.DisableAutoSizing;
     try
-
       // align dragged Control
       Child:=ADockObject.Control;
       Child.Parent:=Site;

examples/anchordocking/design/anchordockingdsgn.lfm

@@ -0,0 +1,21 @@
+inherited EduEnvFrame: TEduEnvFrame
+  Height = 388
+  Width = 495
+  ClientHeight = 388
+  ClientWidth = 495
+  OnClick = FrameClick
+  TabOrder = 0
+  DesignLeft = 725
+  DesignTop = 198
+  object EnableCheckBox: TCheckBox
+    Left = 6
+    Height = 17
+    Top = 6
+    Width = 99
+    BorderSpacing.Around = 6
+    Caption = 'EnableCheckBox'
+    TabOrder = 0
+  end
+  object NoteLabel: TLabel
+  end
+end