lazarus/ide/findinfilesdlg.lfm
2009-04-23 09:08:45 +00:00

217 lines
5.4 KiB
Plaintext

object LazFindInFilesDialog: TLazFindInFilesDialog
Left = 379
Height = 460
Top = 155
Width = 420
ActiveControl = TextToFindComboBox
Caption = 'Find in files'
ClientHeight = 460
ClientWidth = 420
Constraints.MinHeight = 400
Constraints.MinWidth = 260
OnClose = FormClose
OnCreate = FormCreate
Position = poScreenCenter
LCLVersion = '0.9.27'
object TextToFindLabel: TLabel
AnchorSideTop.Control = TextToFindComboBox
AnchorSideTop.Side = asrCenter
Left = 6
Height = 14
Top = 9
Width = 65
Caption = 'Text To Find:'
ParentColor = False
end
object TextToFindComboBox: TComboBox
AnchorSideLeft.Control = TextToFindLabel
AnchorSideLeft.Side = asrBottom
Left = 77
Height = 21
Top = 6
Width = 337
Anchors = [akTop, akLeft, akRight]
AutoComplete = True
AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactRetainPrefixCase, cbactSearchAscending]
BorderSpacing.Left = 6
ItemHeight = 13
ItemWidth = 0
TabOrder = 0
end
object OptionsCheckGroupBox: TCheckGroup
Left = 6
Height = 115
Top = 65
Width = 408
Anchors = [akTop, akLeft, akRight]
AutoFill = True
Caption = 'Options'
ChildSizing.LeftRightSpacing = 6
ChildSizing.TopBottomSpacing = 6
ChildSizing.HorizontalSpacing = 6
ChildSizing.VerticalSpacing = 6
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
ChildSizing.EnlargeVertical = crsHomogenousChildResize
ChildSizing.ShrinkHorizontal = crsScaleChilds
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1
Items.Strings = (
'Case sensitive'
'Whole words only'
'Regular expressions'
'Multi Line'
)
TabOrder = 1
Data = {
0400000002020202
}
end
object WhereRadioGroup: TRadioGroup
Left = 6
Height = 82
Top = 185
Width = 408
Anchors = [akTop, akLeft, akRight]
AutoFill = True
Caption = 'Where'
ChildSizing.LeftRightSpacing = 6
ChildSizing.TopBottomSpacing = 6
ChildSizing.HorizontalSpacing = 6
ChildSizing.VerticalSpacing = 6
ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
ChildSizing.EnlargeVertical = crsHomogenousChildResize
ChildSizing.ShrinkHorizontal = crsScaleChilds
ChildSizing.ShrinkVertical = crsScaleChilds
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1
ClientHeight = 64
ClientWidth = 404
ItemIndex = 1
Items.Strings = (
'search all files in project'
'search all open files'
'search in directories'
)
OnClick = WhereRadioGroupClick
TabOrder = 2
TabStop = True
end
object DirectoryOptionsGroupBox: TGroupBox
Left = 5
Height = 139
Top = 275
Width = 408
Anchors = [akTop, akLeft, akRight, akBottom]
Caption = 'Directory Options'
ClientHeight = 121
ClientWidth = 404
Enabled = False
TabOrder = 3
object DirectoryLabel: TLabel
Left = 6
Height = 14
Top = 8
Width = 49
Caption = 'Directory:'
ParentColor = False
end
object FileMaskLabel: TLabel
Left = 6
Height = 14
Top = 38
Width = 121
Caption = 'File mask (*;*.*;*.bak?):'
ParentColor = False
end
object DirectoryComboBox: TComboBox
AnchorSideLeft.Control = DirectoryLabel
AnchorSideLeft.Side = asrBottom
Left = 55
Height = 21
Top = 6
Width = 285
Anchors = [akTop, akLeft, akRight]
AutoComplete = False
ItemHeight = 13
ItemWidth = 0
TabOrder = 0
end
object DirectoryBrowse: TBitBtn
Left = 346
Height = 25
Top = 6
Width = 25
Anchors = [akTop, akRight]
Caption = '...'
Layout = blGlyphTop
NumGlyphs = 0
OnClick = DirectoryBrowseClick
TabOrder = 1
end
object FileMaskComboBox: TComboBox
Left = 6
Height = 21
Top = 56
Width = 334
Anchors = [akTop, akLeft, akRight]
AutoComplete = False
ItemHeight = 13
ItemWidth = 0
TabOrder = 2
Text = '*.pas;*.pp;*.inc'
end
object IncludeSubDirsCheckBox: TCheckBox
Left = 6
Height = 17
Top = 92
Width = 124
Caption = 'Include sub directories'
TabOrder = 3
end
end
object ReplaceTextComboBox: TComboBox
AnchorSideLeft.Control = ReplaceCheckBox
AnchorSideLeft.Side = asrBottom
Left = 69
Height = 21
Top = 33
Width = 345
Anchors = [akTop, akLeft, akRight]
AutoComplete = True
AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactRetainPrefixCase, cbactSearchAscending]
BorderSpacing.Left = 6
Enabled = False
ItemHeight = 13
ItemWidth = 0
TabOrder = 4
end
object ReplaceCheckBox: TCheckBox
AnchorSideTop.Control = ReplaceTextComboBox
AnchorSideTop.Side = asrCenter
Left = 5
Height = 17
Top = 35
Width = 58
Caption = 'Replace'
Enabled = False
OnChange = ReplaceCheckBoxChange
TabOrder = 5
end
object ButtonPanel1: TButtonPanel
Left = 6
Height = 26
Top = 428
Width = 408
TabOrder = 6
ShowButtons = [pbOK, pbCancel, pbHelp]
ShowBevel = False
end
object SelectDirectoryDialog: TSelectDirectoryDialog
FilterIndex = 0
Options = [ofFileMustExist, ofEnableSizing, ofViewDetail]
left = 260
top = 215
end
end