From 5cfcc7a83af2547a46dd3c76dd0fe04148c0f419 Mon Sep 17 00:00:00 2001
From: wp_xyz <wp_xxyyzzz@gmx.net>
Date: Mon, 7 Oct 2024 09:49:55 +0200
Subject: [PATCH] IDE: Some more refinements in layout of editorfilemanager
 form.

(cherry picked from commit 5ffb95c6b5735bc691494251e8070d8a662c81cb)
---
 ide/editorfilemanager.lfm | 55 ++++++++++++++++++---------------------
 1 file changed, 26 insertions(+), 29 deletions(-)

diff --git a/ide/editorfilemanager.lfm b/ide/editorfilemanager.lfm
index dbe020ffc3..5d4b7647f7 100644
--- a/ide/editorfilemanager.lfm
+++ b/ide/editorfilemanager.lfm
@@ -1,10 +1,10 @@
 object EditorFileManagerForm: TEditorFileManagerForm
   Left = 476
-  Height = 380
+  Height = 379
   Top = 250
   Width = 680
   Caption = 'EditorFileManagerForm'
-  ClientHeight = 380
+  ClientHeight = 379
   ClientWidth = 680
   KeyPreview = True
   LCLVersion = '4.99.0.0'
@@ -16,8 +16,8 @@ object EditorFileManagerForm: TEditorFileManagerForm
     AnchorSideRight.Control = Panel1
     AnchorSideBottom.Control = ButtonPanel1
     Left = 8
-    Height = 293
-    Top = 37
+    Height = 287
+    Top = 42
     Width = 534
     Anchors = [akTop, akLeft, akRight, akBottom]
     BorderSpacing.Top = 1
@@ -33,7 +33,7 @@ object EditorFileManagerForm: TEditorFileManagerForm
   object ButtonPanel1: TButtonPanel
     Left = 8
     Height = 34
-    Top = 338
+    Top = 337
     Width = 664
     BorderSpacing.Around = 8
     OKButton.Name = 'OKButton'
@@ -50,17 +50,14 @@ object EditorFileManagerForm: TEditorFileManagerForm
     ShowButtons = [pbClose, pbHelp]
   end
   object Panel1: TPanel
-    AnchorSideRight.Control = Owner
-    AnchorSideRight.Side = asrBottom
-    AnchorSideBottom.Control = ButtonPanel1
     Left = 542
-    Height = 330
-    Top = 0
+    Height = 287
+    Top = 42
     Width = 138
-    Anchors = [akTop, akRight, akBottom]
+    Align = alRight
     AutoSize = True
     BevelOuter = bvNone
-    ClientHeight = 330
+    ClientHeight = 287
     ClientWidth = 138
     TabOrder = 2
     object CheckAllCheckBox: TCheckBox
@@ -69,7 +66,7 @@ object EditorFileManagerForm: TEditorFileManagerForm
       AnchorSideTop.Side = asrBottom
       Left = 10
       Height = 19
-      Top = 36
+      Top = 26
       Width = 118
       BorderSpacing.Left = 10
       BorderSpacing.Top = 11
@@ -86,7 +83,7 @@ object EditorFileManagerForm: TEditorFileManagerForm
       AnchorSideRight.Side = asrBottom
       Left = 8
       Height = 25
-      Top = 63
+      Top = 53
       Width = 122
       Anchors = [akTop, akLeft, akRight]
       AutoSize = True
@@ -104,7 +101,7 @@ object EditorFileManagerForm: TEditorFileManagerForm
       AnchorSideRight.Side = asrBottom
       Left = 8
       Height = 25
-      Top = 96
+      Top = 86
       Width = 122
       Anchors = [akTop, akLeft, akRight]
       AutoSize = True
@@ -121,7 +118,7 @@ object EditorFileManagerForm: TEditorFileManagerForm
       AnchorSideTop.Side = asrBottom
       Left = 56
       Height = 26
-      Top = 145
+      Top = 135
       Width = 26
       BorderSpacing.Top = 24
       Enabled = False
@@ -136,7 +133,7 @@ object EditorFileManagerForm: TEditorFileManagerForm
       AnchorSideTop.Side = asrBottom
       Left = 56
       Height = 26
-      Top = 179
+      Top = 169
       Width = 26
       BorderSpacing.Top = 8
       Enabled = False
@@ -149,24 +146,24 @@ object EditorFileManagerForm: TEditorFileManagerForm
       AnchorSideTop.Side = asrBottom
       Left = 10
       Height = 15
-      Top = 10
+      Top = 0
       Width = 79
       BorderSpacing.Left = 10
-      BorderSpacing.Top = 10
       Caption = 'FileCountLabel'
       ParentColor = False
     end
   end
   object FilterPanel: TPanel
-    AnchorSideRight.Control = Panel1
     Left = 8
-    Height = 36
-    Top = 0
-    Width = 534
-    Anchors = [akTop, akLeft, akRight]
+    Height = 26
+    Top = 8
+    Width = 664
+    Align = alTop
+    AutoSize = True
+    BorderSpacing.Around = 8
     BevelOuter = bvNone
-    ClientHeight = 36
-    ClientWidth = 534
+    ClientHeight = 26
+    ClientWidth = 664
     TabOrder = 0
     object FilterEdit: TListFilterEdit
       AnchorSideLeft.Control = SortAlphabeticallyButton
@@ -175,7 +172,7 @@ object EditorFileManagerForm: TEditorFileManagerForm
       AnchorSideTop.Side = asrCenter
       Left = 66
       Height = 23
-      Top = 7
+      Top = 2
       Width = 224
       ButtonWidth = 23
       BorderSpacing.Left = 8
@@ -192,7 +189,7 @@ object EditorFileManagerForm: TEditorFileManagerForm
       AnchorSideBottom.Side = asrBottom
       Left = 0
       Height = 25
-      Top = 6
+      Top = 1
       Width = 25
       AllowAllUp = True
       AutoSize = True
@@ -211,7 +208,7 @@ object EditorFileManagerForm: TEditorFileManagerForm
       AnchorSideBottom.Side = asrBottom
       Left = 33
       Height = 25
-      Top = 6
+      Top = 1
       Width = 25
       AllowAllUp = True
       AutoSize = True