paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-24 00:49:45 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: improved layout findinfiles dialog

Browse Source 
git-svn-id: trunk@23950 -
This commit is contained in:
mattias 2010-03-11 20:55:39 +00:00
parent 098790b986
commit 11242b1bc4
1 changed files with 65 additions and 47 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

112
ide/findinfilesdlg.lfm
View File

@ -1,50 +1,56 @@
object LazFindInFilesDialog: TLazFindInFilesDialog
Left = 379
Height = 460
Height = 530
Top = 155
Width = 420
ActiveControl = TextToFindComboBox
Caption = 'Find in files'
ClientHeight = 460
ClientHeight = 530
ClientWidth = 420
Constraints.MinHeight = 400
Constraints.MinWidth = 260
OnClose = FormClose
OnCreate = FormCreate
Position = poScreenCenter
LCLVersion = '0.9.27'
LCLVersion = '0.9.29'
object TextToFindLabel: TLabel
AnchorSideTop.Control = TextToFindComboBox
AnchorSideTop.Side = asrCenter
Left = 6
Height = 14
Top = 9
Width = 65
Height = 18
Top = 11
Width = 76
Caption = 'Text To Find:'
ParentColor = False
end
object TextToFindComboBox: TComboBox
AnchorSideLeft.Control = TextToFindLabel
AnchorSideLeft.Side = asrBottom
Left = 77
Height = 21
Left = 88
Height = 29
Top = 6
Width = 337
Width = 326
Anchors = [akTop, akLeft, akRight]
AutoComplete = True
AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactRetainPrefixCase, cbactSearchAscending]
BorderSpacing.Left = 6
ItemHeight = 13
ItemWidth = 0
ItemHeight = 0
TabOrder = 0
end
object OptionsCheckGroupBox: TCheckGroup
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = ReplaceTextComboBox
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 6
Height = 115
Top = 65
Height = 137
Top = 72
Width = 408
Anchors = [akTop, akLeft, akRight]
AutoFill = True
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Options'
ChildSizing.LeftRightSpacing = 6
ChildSizing.TopBottomSpacing = 6
@ -68,12 +74,19 @@ object LazFindInFilesDialog: TLazFindInFilesDialog
}
end
object WhereRadioGroup: TRadioGroup
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = OptionsCheckGroupBox
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 6
Height = 82
Top = 185
Height = 109
Top = 215
Width = 408
Anchors = [akTop, akLeft, akRight]
AutoFill = True
AutoSize = True
BorderSpacing.Around = 6
Caption = 'Where'
ChildSizing.LeftRightSpacing = 6
ChildSizing.TopBottomSpacing = 6
@ -85,7 +98,7 @@ object LazFindInFilesDialog: TLazFindInFilesDialog
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1
ClientHeight = 64
ClientHeight = 90
ClientWidth = 404
ItemIndex = 1
Items.Strings = (
@ -98,43 +111,48 @@ object LazFindInFilesDialog: TLazFindInFilesDialog
TabStop = True
end
object DirectoryOptionsGroupBox: TGroupBox
Left = 5
Height = 139
Top = 275
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = WhereRadioGroup
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Control = ButtonPanel1
Left = 6
Height = 156
Top = 330
Width = 408
Anchors = [akTop, akLeft, akRight, akBottom]
BorderSpacing.Around = 6
Caption = 'Directory Options'
ClientHeight = 121
ClientHeight = 137
ClientWidth = 404
Enabled = False
TabOrder = 3
object DirectoryLabel: TLabel
Left = 6
Height = 14
Height = 18
Top = 8
Width = 49
Width = 62
Caption = 'Directory:'
ParentColor = False
end
object FileMaskLabel: TLabel
Left = 6
Height = 14
Height = 18
Top = 38
Width = 121
Width = 152
Caption = 'File mask (*;*.*;*.bak?):'
ParentColor = False
end
object DirectoryComboBox: TComboBox
AnchorSideLeft.Control = DirectoryLabel
AnchorSideLeft.Side = asrBottom
Left = 55
Height = 21
Left = 68
Height = 29
Top = 6
Width = 285
Width = 272
Anchors = [akTop, akLeft, akRight]
AutoComplete = False
ItemHeight = 13
ItemWidth = 0
ItemHeight = 0
TabOrder = 0
end
object DirectoryBrowse: TBitBtn
@ -151,21 +169,19 @@ object LazFindInFilesDialog: TLazFindInFilesDialog
end
object FileMaskComboBox: TComboBox
Left = 6
Height = 21
Height = 29
Top = 56
Width = 334
Anchors = [akTop, akLeft, akRight]
AutoComplete = False
ItemHeight = 13
ItemWidth = 0
ItemHeight = 0
TabOrder = 2
Text = '*.pas;*.pp;*.inc'
end
object IncludeSubDirsCheckBox: TCheckBox
Left = 6
Height = 17
Height = 22
Top = 92
Width = 124
Width = 167
Caption = 'Include sub directories'
TabOrder = 3
end
@ -173,26 +189,28 @@ object LazFindInFilesDialog: TLazFindInFilesDialog
object ReplaceTextComboBox: TComboBox
AnchorSideLeft.Control = ReplaceCheckBox
AnchorSideLeft.Side = asrBottom
Left = 69
Height = 21
Top = 33
Width = 345
AnchorSideTop.Control = TextToFindComboBox
AnchorSideTop.Side = asrBottom
Left = 84
Height = 29
Top = 37
Width = 330
Anchors = [akTop, akLeft, akRight]
AutoComplete = True
AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactRetainPrefixCase, cbactSearchAscending]
BorderSpacing.Left = 6
BorderSpacing.Top = 2
Enabled = False
ItemHeight = 13
ItemWidth = 0
ItemHeight = 0
TabOrder = 4
end
object ReplaceCheckBox: TCheckBox
AnchorSideTop.Control = ReplaceTextComboBox
AnchorSideTop.Side = asrCenter
Left = 5
Height = 17
Top = 35
Width = 58
Height = 22
Top = 40
Width = 73
Caption = 'Replace'
Enabled = False
OnChange = ReplaceCheckBoxChange
@ -200,8 +218,8 @@ object LazFindInFilesDialog: TLazFindInFilesDialog
end
object ButtonPanel1: TButtonPanel
Left = 6
Height = 26
Top = 428
Height = 32
Top = 492
Width = 408
TabOrder = 6
ShowButtons = [pbOK, pbCancel, pbHelp]