From b33513dac31791116303e5112642f374a6f84ab5 Mon Sep 17 00:00:00 2001
From: Martin <laz.git@mfriebe.de>
Date: Wed, 5 Mar 2025 20:20:14 +0100
Subject: [PATCH] IDE, Debugger: make toolbars in debug-dialogs wrap-able

---
 ide/packages/idedebugger/breakpointsdlg.lfm | 10 ++++++----
 ide/packages/idedebugger/callstackdlg.lfm   | 11 +++++++----
 ide/packages/idedebugger/historydlg.lfm     | 15 ++++++++-------
 ide/packages/idedebugger/threaddlg.lfm      | 11 +++++++----
 4 files changed, 28 insertions(+), 19 deletions(-)

diff --git a/ide/packages/idedebugger/breakpointsdlg.lfm b/ide/packages/idedebugger/breakpointsdlg.lfm
index 19383ab1b6..797baaab31 100644
--- a/ide/packages/idedebugger/breakpointsdlg.lfm
+++ b/ide/packages/idedebugger/breakpointsdlg.lfm
@@ -10,18 +10,20 @@ object BreakpointsDlg: TBreakpointsDlg
   Caption = 'Breakpoint list'
   ClientHeight = 205
   ClientWidth = 560
-  LCLVersion = '3.99.0.0'
+  LCLVersion = '4.99.0.0'
   Visible = True
   OnCreate = BreakpointsDlgCREATE
   object ToolBar1: TToolBar
     Left = 0
-    Height = 26
+    Height = 24
     Top = 0
     Width = 560
+    AutoSize = True
     Caption = 'ToolBar1'
     ParentShowHint = False
     ShowHint = True
     TabOrder = 0
+    Orientation = tboHorizontal
     object ToolButtonAdd: TToolButton
       Left = 1
       Top = 2
@@ -93,8 +95,8 @@ object BreakpointsDlg: TBreakpointsDlg
   end
   object tvBreakPoints: TDbgTreeView
     Left = 0
-    Height = 179
-    Top = 26
+    Height = 181
+    Top = 24
     Width = 560
     Align = alClient
     DefaultText = 'Node'
diff --git a/ide/packages/idedebugger/callstackdlg.lfm b/ide/packages/idedebugger/callstackdlg.lfm
index 0aee0c3c35..ee597805e0 100644
--- a/ide/packages/idedebugger/callstackdlg.lfm
+++ b/ide/packages/idedebugger/callstackdlg.lfm
@@ -7,13 +7,13 @@ object CallStackDlg: TCallStackDlg
   Caption = 'CallStack'
   ClientHeight = 246
   ClientWidth = 562
-  LCLVersion = '3.99.0.0'
+  LCLVersion = '4.99.0.0'
   Visible = True
   OnCreate = FormCreate
   object lvCallStack: TListView
     Left = 0
-    Height = 220
-    Top = 26
+    Height = 221
+    Top = 25
     Width = 562
     Align = alClient
     Columns = <    
@@ -47,15 +47,18 @@ object CallStackDlg: TCallStackDlg
   end
   object ToolBar1: TToolBar
     Left = 0
-    Height = 26
+    Height = 24
     Top = 0
     Width = 562
+    AutoSize = True
+    BorderSpacing.Bottom = 1
     Caption = 'tbButtons'
     List = True
     ParentShowHint = False
     ShowCaptions = True
     ShowHint = True
     TabOrder = 1
+    Orientation = tboHorizontal
     object ToolButtonShow: TToolButton
       Left = 32
       Top = 2
diff --git a/ide/packages/idedebugger/historydlg.lfm b/ide/packages/idedebugger/historydlg.lfm
index d0ffbcbcdd..815036133e 100644
--- a/ide/packages/idedebugger/historydlg.lfm
+++ b/ide/packages/idedebugger/historydlg.lfm
@@ -7,11 +7,11 @@ object HistoryDialog: THistoryDialog
   Caption = 'HistoryDialog'
   ClientHeight = 240
   ClientWidth = 422
-  LCLVersion = '3.99.0.0'
+  LCLVersion = '4.99.0.0'
   object lvHistory: TListView
     Left = 0
-    Height = 214
-    Top = 26
+    Height = 216
+    Top = 24
     Width = 422
     Align = alClient
     Columns = <    
@@ -33,14 +33,15 @@ object HistoryDialog: THistoryDialog
   end
   object ToolBar1: TToolBar
     Left = 0
-    Height = 26
+    Height = 24
     Top = 0
     Width = 422
+    AutoSize = True
     Caption = 'ToolBar1'
     ParentShowHint = False
     ShowHint = True
     TabOrder = 1
-    Wrapable = False
+    Orientation = tboHorizontal
     object tbHistorySelected: TToolButton
       Left = 24
       Top = 2
@@ -117,13 +118,13 @@ object HistoryDialog: THistoryDialog
       Style = tbsDivider
     end
     object tbExport: TToolButton
-      Left = 218
+      Left = 208
       Top = 2
       Caption = 'tbExport'
       OnClick = tbExportClick
     end
     object tbImport: TToolButton
-      Left = 195
+      Left = 185
       Top = 2
       Caption = 'tbImport'
       OnClick = tbImportClick
diff --git a/ide/packages/idedebugger/threaddlg.lfm b/ide/packages/idedebugger/threaddlg.lfm
index 879d2e4528..db03027f5a 100644
--- a/ide/packages/idedebugger/threaddlg.lfm
+++ b/ide/packages/idedebugger/threaddlg.lfm
@@ -7,11 +7,11 @@ object ThreadsDlg: TThreadsDlg
   Caption = 'Threads'
   ClientHeight = 240
   ClientWidth = 774
-  LCLVersion = '3.99.0.0'
+  LCLVersion = '4.99.0.0'
   object lvThreads: TListView
     Left = 0
-    Height = 214
-    Top = 26
+    Height = 215
+    Top = 25
     Width = 774
     Align = alClient
     Columns = <    
@@ -53,12 +53,15 @@ object ThreadsDlg: TThreadsDlg
   end
   object ToolBar1: TToolBar
     Left = 0
-    Height = 26
+    Height = 24
     Top = 0
     Width = 774
+    AutoSize = True
+    BorderSpacing.Bottom = 1
     Caption = 'ToolBar1'
     ShowCaptions = True
     TabOrder = 1
+    Orientation = tboHorizontal
     object tbCurrent: TToolButton
       Left = 1
       Top = 2