IDE: Tweaking SearchForm. Issue #31062, patch from AlexeyT.

git-svn-id: trunk@53767 -
This commit is contained in:
juha 2016-12-23 12:55:54 +00:00
parent 4e0a04d655
commit 5376312e14

View File

@ -3,6 +3,7 @@ object SearchProgressForm: TSearchProgressForm
Height = 167 Height = 167
Top = 387 Top = 387
Width = 700 Width = 700
BorderIcons = [biSystemMenu, biMinimize]
Caption = 'Searching....' Caption = 'Searching....'
ClientHeight = 167 ClientHeight = 167
ClientWidth = 700 ClientWidth = 700
@ -20,7 +21,7 @@ object SearchProgressForm: TSearchProgressForm
Top = 0 Top = 0
Width = 700 Width = 700
Align = alClient Align = alClient
BevelInner = bvLowered BevelOuter = bvNone
ClientHeight = 167 ClientHeight = 167
ClientWidth = 700 ClientWidth = 700
FullRepaint = False FullRepaint = False
@ -30,7 +31,7 @@ object SearchProgressForm: TSearchProgressForm
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 121 Left = 121
Height = 1 Height = 1
Top = 88 Top = 99
Width = 1 Width = 1
ParentColor = False ParentColor = False
ShowAccelChar = False ShowAccelChar = False
@ -39,9 +40,9 @@ object SearchProgressForm: TSearchProgressForm
AnchorSideTop.Control = SearchingLabel AnchorSideTop.Control = SearchingLabel
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 16 Left = 16
Height = 13 Height = 18
Top = 82 Top = 90
Width = 40 Width = 51
BorderSpacing.Top = 18 BorderSpacing.Top = 18
Caption = 'Matches' Caption = 'Matches'
ParentColor = False ParentColor = False
@ -51,7 +52,7 @@ object SearchProgressForm: TSearchProgressForm
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 121 Left = 121
Height = 1 Height = 1
Top = 57 Top = 63
Width = 1 Width = 1
ParentColor = False ParentColor = False
ShowAccelChar = False ShowAccelChar = False
@ -60,9 +61,9 @@ object SearchProgressForm: TSearchProgressForm
AnchorSideTop.Control = SearchTextLabel AnchorSideTop.Control = SearchTextLabel
AnchorSideTop.Side = asrBottom AnchorSideTop.Side = asrBottom
Left = 16 Left = 16
Height = 13 Height = 18
Top = 51 Top = 54
Width = 51 Width = 62
BorderSpacing.Top = 18 BorderSpacing.Top = 18
Caption = 'Searching:' Caption = 'Searching:'
ParentColor = False ParentColor = False
@ -70,9 +71,9 @@ object SearchProgressForm: TSearchProgressForm
object SearchTextLabel: TLabel object SearchTextLabel: TLabel
AnchorSideTop.Control = Panel2 AnchorSideTop.Control = Panel2
Left = 16 Left = 16
Height = 13 Height = 18
Top = 20 Top = 18
Width = 62 Width = 72
BorderSpacing.Top = 18 BorderSpacing.Top = 18
Caption = 'Search Text:' Caption = 'Search Text:'
ParentColor = False ParentColor = False
@ -82,7 +83,7 @@ object SearchProgressForm: TSearchProgressForm
AnchorSideTop.Side = asrCenter AnchorSideTop.Side = asrCenter
Left = 121 Left = 121
Height = 1 Height = 1
Top = 26 Top = 27
Width = 1 Width = 1
ParentColor = False ParentColor = False
ShowAccelChar = False ShowAccelChar = False
@ -94,16 +95,17 @@ object SearchProgressForm: TSearchProgressForm
AnchorSideRight.Side = asrBottom AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = Panel2 AnchorSideBottom.Control = Panel2
AnchorSideBottom.Side = asrBottom AnchorSideBottom.Side = asrBottom
Left = 312 Left = 310
Height = 26 Height = 26
Top = 133 Top = 135
Width = 77 Width = 80
Anchors = [akLeft, akBottom] Anchors = [akLeft, akBottom]
AutoSize = True AutoSize = True
BorderSpacing.Top = 12 BorderSpacing.Top = 12
BorderSpacing.Bottom = 6 BorderSpacing.Bottom = 6
Cancel = True Cancel = True
Caption = 'Cancel' Caption = 'Cancel'
Constraints.MinWidth = 80
Kind = bkCancel Kind = bkCancel
ModalResult = 2 ModalResult = 2
OnClick = btnAbortCLICK OnClick = btnAbortCLICK