IDE: Adjust anchors so that "Component palette" options page can be resized. Issue #30715, patch from Michl.

git-svn-id: trunk@53233 -

ide/frames/componentpalette_options.lfm

@@ -14,18 +14,17 @@ object CompPaletteOptionsFrame: TCompPaletteOptionsFrame
     AnchorSideTop.Control = cbPaletteVisible
     AnchorSideTop.Side = asrBottom
     AnchorSideRight.Control = Splitter1
-    AnchorSideRight.Side = asrBottom
     AnchorSideBottom.Control = Owner
     AnchorSideBottom.Side = asrBottom
     Left = 0
-    Height = 440
-    Top = 28
-    Width = 195
+    Height = 439
+    Top = 29
+    Width = 190
     Anchors = [akTop, akLeft, akRight, akBottom]
     BorderSpacing.Top = 6
     Caption = 'PagesGroupBox'
-    ClientHeight = 419
-    ClientWidth = 191
+    ClientHeight = 421
+    ClientWidth = 186
     Constraints.MinWidth = 100
     TabOrder = 0
     object PagesListBox: TListBox
@@ -34,9 +33,9 @@ object CompPaletteOptionsFrame: TCompPaletteOptionsFrame
       AnchorSideRight.Control = PageMoveUpBtn
       AnchorSideBottom.Control = AddPageButton
       Left = 1
-      Height = 326
+      Height = 344
       Top = 0
-      Width = 156
+      Width = 151
       Anchors = [akTop, akLeft, akRight, akBottom]
       BorderSpacing.Left = 1
       BorderSpacing.Right = 6
@@ -54,9 +53,9 @@ object CompPaletteOptionsFrame: TCompPaletteOptionsFrame
       AnchorSideTop.Side = asrBottom
       AnchorSideBottom.Control = ImportDividerBevel
       Left = 1
-      Height = 29
-      Top = 332
-      Width = 49
+      Height = 23
+      Top = 350
+      Width = 60
       Anchors = [akLeft, akBottom]
       AutoSize = True
       BorderSpacing.Top = 6
@@ -70,9 +69,9 @@ object CompPaletteOptionsFrame: TCompPaletteOptionsFrame
       AnchorSideLeft.Side = asrBottom
       AnchorSideTop.Control = AddPageButton
       AnchorSideBottom.Side = asrBottom
-      Left = 59
-      Height = 29
-      Top = 332
+      Left = 70
+      Height = 23
+      Top = 350
       Width = 101
       AutoSize = True
       BorderSpacing.Left = 9
@@ -85,7 +84,7 @@ object CompPaletteOptionsFrame: TCompPaletteOptionsFrame
       AnchorSideLeft.Control = PageMoveUpBtn
       AnchorSideTop.Control = PageMoveUpBtn
       AnchorSideTop.Side = asrBottom
-      Left = 163
+      Left = 158
       Height = 26
       Top = 135
       Width = 22
@@ -100,7 +99,7 @@ object CompPaletteOptionsFrame: TCompPaletteOptionsFrame
       AnchorSideTop.Side = asrBottom
       AnchorSideRight.Control = PagesGroupBox
       AnchorSideRight.Side = asrBottom
-      Left = 163
+      Left = 158
       Height = 26
       Top = 102
       Width = 22
@@ -118,9 +117,9 @@ object CompPaletteOptionsFrame: TCompPaletteOptionsFrame
       AnchorSideRight.Side = asrBottom
       AnchorSideBottom.Control = ImportButton
       Left = 1
-      Height = 17
-      Top = 367
-      Width = 190
+      Height = 13
+      Top = 379
+      Width = 185
       Caption = 'Import / Export'
       Anchors = [akLeft, akRight, akBottom]
       Font.Style = [fsBold]
@@ -129,14 +128,14 @@ object CompPaletteOptionsFrame: TCompPaletteOptionsFrame
     object ImportButton: TBitBtn
       AnchorSideLeft.Control = ExportButton
       AnchorSideLeft.Side = asrBottom
-      AnchorSideTop.Control = ExportButton
       AnchorSideTop.Side = asrCenter
       AnchorSideBottom.Control = PagesGroupBox
       AnchorSideBottom.Side = asrBottom
-      Left = 77
-      Height = 29
-      Top = 384
-      Width = 65
+      Left = 87
+      Height = 23
+      Top = 392
+      Width = 73
+      Anchors = [akLeft, akBottom]
       AutoSize = True
       BorderSpacing.Left = 13
       BorderSpacing.Bottom = 6
@@ -151,9 +150,9 @@ object CompPaletteOptionsFrame: TCompPaletteOptionsFrame
       AnchorSideBottom.Control = PagesGroupBox
       AnchorSideBottom.Side = asrBottom
       Left = 1
-      Height = 29
-      Top = 384
-      Width = 63
+      Height = 23
+      Top = 392
+      Width = 73
       Anchors = [akLeft, akBottom]
       AutoSize = True
       BorderSpacing.Top = 3
@@ -166,9 +165,10 @@ object CompPaletteOptionsFrame: TCompPaletteOptionsFrame
   object ComponentsGroupBox: TGroupBox
     AnchorSideLeft.Control = Splitter1
     AnchorSideLeft.Side = asrBottom
+    AnchorSideTop.Control = Owner
     AnchorSideRight.Control = Owner
     AnchorSideRight.Side = asrBottom
-    AnchorSideBottom.Control = PagesGroupBox
+    AnchorSideBottom.Control = Owner
     AnchorSideBottom.Side = asrBottom
     Left = 201
     Height = 468
@@ -177,7 +177,7 @@ object CompPaletteOptionsFrame: TCompPaletteOptionsFrame
     Anchors = [akTop, akLeft, akRight, akBottom]
     BorderSpacing.Left = 6
     Caption = 'ComponentsGroupBox'
-    ClientHeight = 447
+    ClientHeight = 450
     ClientWidth = 384
     TabOrder = 1
     object ComponentsListView: TListView
@@ -187,7 +187,7 @@ object CompPaletteOptionsFrame: TCompPaletteOptionsFrame
       AnchorSideBottom.Control = ComponentsGroupBox
       AnchorSideBottom.Side = asrBottom
       Left = 1
-      Height = 445
+      Height = 448
       Top = 1
       Width = 349
       Anchors = [akTop, akLeft, akRight, akBottom]
@@ -274,11 +274,12 @@ object CompPaletteOptionsFrame: TCompPaletteOptionsFrame
     Anchors = []
   end
   object cbPaletteVisible: TCheckBox
-    AnchorSideTop.Side = asrBottom
-    Left = 1
-    Height = 22
-    Top = 0
-    Width = 115
+    AnchorSideLeft.Control = Owner
+    AnchorSideTop.Control = Owner
+    Left = 0
+    Height = 17
+    Top = 6
+    Width = 96
     BorderSpacing.Top = 6
     Caption = 'Palette is visible'
     TabOrder = 3