From b9e0694773b58b98cdac4aa9480a3b3ea11e4895 Mon Sep 17 00:00:00 2001
From: maxim <maxim@lazarus-ide.org>
Date: Thu, 22 Apr 2010 23:13:39 +0000
Subject: [PATCH] Debugger: improve 'event log' options tab layout

git-svn-id: trunk@24837 -
---
 debugger/frames/debugger_eventlog_options.lfm | 55 ++++++++++---------
 1 file changed, 29 insertions(+), 26 deletions(-)

diff --git a/debugger/frames/debugger_eventlog_options.lfm b/debugger/frames/debugger_eventlog_options.lfm
index 95e506e342..1ab73f53e1 100644
--- a/debugger/frames/debugger_eventlog_options.lfm
+++ b/debugger/frames/debugger_eventlog_options.lfm
@@ -10,25 +10,23 @@ inherited DebuggerEventLogOptionsFrame: TDebuggerEventLogOptionsFrame
   object gbGeneral: TGroupBox[0]
     AnchorSideLeft.Control = Owner
     AnchorSideTop.Control = Owner
-    AnchorSideRight.Control = Owner
-    AnchorSideRight.Side = asrBottom
     Left = 0
-    Height = 168
+    Height = 151
     Top = 0
-    Width = 168
+    Width = 128
+    AutoSize = True
     Caption = 'General'
-    ClientHeight = 150
-    ClientWidth = 164
+    ClientHeight = 133
+    ClientWidth = 124
     TabOrder = 0
     object chkClearLogOnRun: TCheckBox
       AnchorSideLeft.Control = gbGeneral
       AnchorSideTop.Control = gbGeneral
       Left = 6
-      Height = 19
+      Height = 17
       Top = 6
-      Width = 105
-      BorderSpacing.Left = 6
-      BorderSpacing.Top = 6
+      Width = 94
+      BorderSpacing.Around = 6
       Caption = 'Clear log on run'
       Checked = True
       State = cbChecked
@@ -39,10 +37,10 @@ inherited DebuggerEventLogOptionsFrame: TDebuggerEventLogOptionsFrame
       AnchorSideTop.Control = chkClearLogOnRun
       AnchorSideTop.Side = asrBottom
       Left = 6
-      Height = 19
-      Top = 25
-      Width = 114
-      BorderSpacing.Left = 6
+      Height = 17
+      Top = 29
+      Width = 98
+      BorderSpacing.Around = 6
       Caption = 'Limit linecount to'
       TabOrder = 1
     end
@@ -51,10 +49,13 @@ inherited DebuggerEventLogOptionsFrame: TDebuggerEventLogOptionsFrame
       AnchorSideTop.Control = chkLimitLinecount
       AnchorSideTop.Side = asrBottom
       Left = 26
-      Height = 23
-      Top = 44
-      Width = 82
+      Height = 21
+      Top = 52
+      Width = 92
       BorderSpacing.Left = 20
+      BorderSpacing.Top = 6
+      BorderSpacing.Right = 6
+      BorderSpacing.Bottom = 60
       TabOrder = 2
     end
   end
@@ -66,14 +67,15 @@ inherited DebuggerEventLogOptionsFrame: TDebuggerEventLogOptionsFrame
     AnchorSideRight.Side = asrBottom
     AnchorSideBottom.Control = gbGeneral
     AnchorSideBottom.Side = asrBottom
-    Left = 168
-    Height = 168
+    Left = 134
+    Height = 151
     Top = 0
-    Width = 366
+    Width = 400
     Anchors = [akTop, akLeft, akRight, akBottom]
+    BorderSpacing.Left = 6
     Caption = 'Messages'
-    ClientHeight = 150
-    ClientWidth = 362
+    ClientHeight = 133
+    ClientWidth = 396
     TabOrder = 1
     object cbMessages: TCheckListBox
       AnchorSideLeft.Control = gbMessages
@@ -83,9 +85,9 @@ inherited DebuggerEventLogOptionsFrame: TDebuggerEventLogOptionsFrame
       AnchorSideBottom.Control = gbMessages
       AnchorSideBottom.Side = asrBottom
       Left = 6
-      Height = 138
+      Height = 121
       Top = 6
-      Width = 350
+      Width = 384
       Anchors = [akTop, akLeft, akRight, akBottom]
       BorderSpacing.Around = 6
       ItemHeight = 0
@@ -101,10 +103,11 @@ inherited DebuggerEventLogOptionsFrame: TDebuggerEventLogOptionsFrame
     AnchorSideBottom.Control = Owner
     AnchorSideBottom.Side = asrBottom
     Left = 0
-    Height = 161
-    Top = 168
+    Height = 172
+    Top = 157
     Width = 534
     Anchors = [akTop, akLeft, akRight, akBottom]
+    BorderSpacing.Top = 6
     Caption = 'Colors'
     TabOrder = 2
   end