Center vertically align search buttons with edit

Villavu · Jul 15, 2016 · 12880c8 · 12880c8
1 parent b6134dc
commit 12880c8
Showing 1 changed file with 22 additions and 22 deletions.
diff --git a/Projects/Simba/simbaunit.lfm b/Projects/Simba/simbaunit.lfm
@@ -343,9 +343,9 @@ object SimbaForm: TSimbaForm
       TabOrder = 1
       Visible = False
       object SpeedButtonSearch: TSpeedButton
-        Left = 24
+        Left = 17
         Height = 19
-        Top = 12
+        Top = 10
         Width = 16
         Flat = True
         Glyph.Data = {
@@ -427,19 +427,19 @@ object SimbaForm: TSimbaForm
         OnClick = SpeedButtonSearchClick
       end
       object LabeledEditSearch: TLabeledEdit
-        Left = 104
-        Height = 30
-        Top = 6
-        Width = 192
+        Left = 79
+        Height = 21
+        Top = 9
+        Width = 248
         EditLabel.AnchorSideTop.Control = LabeledEditSearch
         EditLabel.AnchorSideTop.Side = asrCenter
         EditLabel.AnchorSideRight.Control = LabeledEditSearch
         EditLabel.AnchorSideBottom.Control = LabeledEditSearch
         EditLabel.AnchorSideBottom.Side = asrBottom
-        EditLabel.Left = 59
-        EditLabel.Height = 18
-        EditLabel.Top = 12
-        EditLabel.Width = 42
+        EditLabel.Left = 47
+        EditLabel.Height = 13
+        EditLabel.Top = 13
+        EditLabel.Width = 29
         EditLabel.Caption = 'Find: '
         EditLabel.ParentColor = False
         LabelPosition = lpLeft
@@ -451,27 +451,27 @@ object SimbaForm: TSimbaForm
         OnKeyPress = LabeledEditSearchKeyPress
       end
       object CheckBoxMatchCase: TCheckBox
-        Left = 376
-        Height = 22
-        Top = 10
-        Width = 110
+        Left = 398
+        Height = 17
+        Top = 11
+        Width = 74
         Caption = 'Match case'
         OnClick = CheckBoxMatchCaseClick
         TabOrder = 1
       end
       object SpeedButtonFindNext: TSpeedButton
-        Left = 304
-        Height = 26
-        Top = 8
-        Width = 26
+        Left = 334
+        Height = 25
+        Top = 7
+        Width = 25
         Action = ActionFindNext
         Caption = '▿'
       end
       object SpeedButtonFindPrev: TSpeedButton
-        Left = 336
-        Height = 26
-        Top = 8
-        Width = 26
+        Left = 366
+        Height = 25
+        Top = 7
+        Width = 25
         Action = ActionFindPrev
         Caption = '▵'
       end