mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-11-02 13:40:00 +01:00
IDE Find in files: added multi line option
git-svn-id: trunk@9780 -
This commit is contained in:
mattias
parent
8783e0100d
commit
744a7fed82
@ -1,14 +1,15 @@
|
||||
object LazFindInFilesDialog: TLazFindInFilesDialog
|
||||
Left = 391
|
||||
Height = 423
|
||||
Height = 460
|
||||
Top = 158
|
||||
Width = 385
|
||||
HorzScrollBar.Page = 384
|
||||
VertScrollBar.Page = 422
|
||||
Width = 420
|
||||
HorzScrollBar.Page = 419
|
||||
VertScrollBar.Page = 459
|
||||
ActiveControl = TextToFindComboBox
|
||||
Caption = 'Find in files'
|
||||
Constraints.MinHeight = 400
|
||||
Constraints.MinWidth = 260
|
||||
OnClose = FormClose
|
||||
OnCreate = FormCreate
|
||||
Position = poScreenCenter
|
||||
object TextToFindLabel: TLabel
|
||||
@ -26,7 +27,7 @@ object LazFindInFilesDialog: TLazFindInFilesDialog
|
||||
Left = 102
|
||||
Height = 21
|
||||
Top = 6
|
||||
Width = 277
|
||||
Width = 312
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
AutoComplete = True
|
||||
AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactRetainPrefixCase, cbactSearchAscending]
|
||||
@ -35,9 +36,9 @@ object LazFindInFilesDialog: TLazFindInFilesDialog
|
||||
end
|
||||
object OptionsCheckGroupBox: TCheckGroup
|
||||
Left = 6
|
||||
Height = 86
|
||||
Height = 115
|
||||
Top = 65
|
||||
Width = 373
|
||||
Width = 408
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
AutoFill = True
|
||||
BorderSpacing.InnerBorder = 6
|
||||
@ -56,17 +57,18 @@ object LazFindInFilesDialog: TLazFindInFilesDialog
|
||||
'Case sensitive'
|
||||
'Whole words only'
|
||||
'Regular expressions'
|
||||
'Multi Line'
|
||||
)
|
||||
TabOrder = 1
|
||||
Data = {
|
||||
03000000020202
|
||||
0400000002020202
|
||||
}
|
||||
end
|
||||
object WhereRadioGroup: TRadioGroup
|
||||
Left = 6
|
||||
Height = 82
|
||||
Top = 155
|
||||
Width = 373
|
||||
Top = 185
|
||||
Width = 408
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
AutoFill = True
|
||||
Caption = 'Where'
|
||||
@ -91,9 +93,9 @@ object LazFindInFilesDialog: TLazFindInFilesDialog
|
||||
end
|
||||
object DirectoryOptionsGroupBox: TGroupBox
|
||||
Left = 6
|
||||
Height = 137
|
||||
Top = 240
|
||||
Width = 373
|
||||
Height = 139
|
||||
Top = 275
|
||||
Width = 408
|
||||
Anchors = [akTop, akLeft, akRight, akBottom]
|
||||
Caption = 'Directory Options'
|
||||
Enabled = False
|
||||
@ -120,14 +122,14 @@ object LazFindInFilesDialog: TLazFindInFilesDialog
|
||||
Left = 88
|
||||
Height = 21
|
||||
Top = 6
|
||||
Width = 241
|
||||
Width = 260
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
|
||||
MaxLength = 0
|
||||
TabOrder = 0
|
||||
end
|
||||
object DirectoryBrowse: TBitBtn
|
||||
Left = 335
|
||||
Left = 354
|
||||
Height = 21
|
||||
Top = 6
|
||||
Width = 21
|
||||
@ -142,7 +144,7 @@ object LazFindInFilesDialog: TLazFindInFilesDialog
|
||||
Left = 6
|
||||
Height = 21
|
||||
Top = 56
|
||||
Width = 323
|
||||
Width = 342
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
AutoCompleteText = [cbactEndOfLineComplete, cbactSearchAscending]
|
||||
MaxLength = 0
|
||||
@ -151,7 +153,7 @@ object LazFindInFilesDialog: TLazFindInFilesDialog
|
||||
end
|
||||
object IncludeSubDirsCheckBox: TCheckBox
|
||||
Left = 6
|
||||
Height = 24
|
||||
Height = 20
|
||||
Top = 92
|
||||
Width = 154
|
||||
Caption = 'Include sub directories'
|
||||
@ -159,9 +161,9 @@ object LazFindInFilesDialog: TLazFindInFilesDialog
|
||||
end
|
||||
end
|
||||
object OKButton: TButton
|
||||
Left = 221
|
||||
Left = 256
|
||||
Height = 25
|
||||
Top = 391
|
||||
Top = 428
|
||||
Width = 75
|
||||
Anchors = [akRight, akBottom]
|
||||
BorderSpacing.Around = 6
|
||||
@ -172,9 +174,9 @@ object LazFindInFilesDialog: TLazFindInFilesDialog
|
||||
TabOrder = 4
|
||||
end
|
||||
object CancelButton: TButton
|
||||
Left = 304
|
||||
Left = 339
|
||||
Height = 25
|
||||
Top = 391
|
||||
Top = 428
|
||||
Width = 75
|
||||
Anchors = [akRight, akBottom]
|
||||
BorderSpacing.Around = 6
|
||||
@ -188,7 +190,7 @@ object LazFindInFilesDialog: TLazFindInFilesDialog
|
||||
Left = 102
|
||||
Height = 25
|
||||
Top = 33
|
||||
Width = 277
|
||||
Width = 312
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
AutoComplete = True
|
||||
AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactRetainPrefixCase, cbactSearchAscending]
|
||||
|
||||
@ -2,76 +2,76 @@
|
||||
|
||||
LazarusResources.Add('TLazFindInFilesDialog','FORMDATA',[
|
||||
'TPF0'#21'TLazFindInFilesDialog'#20'LazFindInFilesDialog'#4'Left'#3#135#1#6'H'
|
||||
+'eight'#3#167#1#3'Top'#3#158#0#5'Width'#3#129#1#18'HorzScrollBar.Page'#3#128
|
||||
+#1#18'VertScrollBar.Page'#3#166#1#13'ActiveControl'#7#18'TextToFindComboBox'
|
||||
+'eight'#3#204#1#3'Top'#3#158#0#5'Width'#3#164#1#18'HorzScrollBar.Page'#3#163
|
||||
+#1#18'VertScrollBar.Page'#3#203#1#13'ActiveControl'#7#18'TextToFindComboBox'
|
||||
+#7'Caption'#6#13'Find in files'#21'Constraints.MinHeight'#3#144#1#20'Constra'
|
||||
+'ints.MinWidth'#3#4#1#8'OnCreate'#7#10'FormCreate'#8'Position'#7#14'poScreen'
|
||||
+'Center'#0#6'TLabel'#15'TextToFindLabel'#21'AnchorSideTop.Control'#7#18'Text'
|
||||
+'ToFindComboBox'#18'AnchorSideTop.Side'#7#9'asrCenter'#4'Left'#2#6#6'Height'
|
||||
+#2#13#3'Top'#2#10#5'Width'#2'J'#7'Caption'#6#13'Text To Find:'#5'Color'#7#6
|
||||
+'clNone'#11'ParentColor'#8#0#0#9'TComboBox'#18'TextToFindComboBox'#4'Left'#2
|
||||
+'f'#6'Height'#2#21#3'Top'#2#6#5'Width'#3#21#1#7'Anchors'#11#5'akTop'#6'akLef'
|
||||
+'t'#7'akRight'#0#12'AutoComplete'#9#16'AutoCompleteText'#11#12'cbactEnabled'
|
||||
+#22'cbactEndOfLineComplete'#21'cbactRetainPrefixCase'#20'cbactSearchAscendin'
|
||||
+'g'#0#9'MaxLength'#2#0#8'TabOrder'#2#0#0#0#11'TCheckGroup'#20'OptionsCheckGr'
|
||||
+'oupBox'#4'Left'#2#6#6'Height'#2'V'#3'Top'#2'A'#5'Width'#3'u'#1#7'Anchors'#11
|
||||
+#5'akTop'#6'akLeft'#7'akRight'#0#8'AutoFill'#9#25'BorderSpacing.InnerBorder'
|
||||
+#2#6#7'Caption'#6#7'Options'#28'ChildSizing.LeftRightSpacing'#2#6#28'ChildSi'
|
||||
+'zing.TopBottomSpacing'#2#6#29'ChildSizing.HorizontalSpacing'#2#6#27'ChildSi'
|
||||
+'zing.VerticalSpacing'#2#6#29'ChildSizing.EnlargeHorizontal'#7#24'crsHomogen'
|
||||
+'ousChildResize'#27'ChildSizing.EnlargeVertical'#7#24'crsHomogenousChildResi'
|
||||
+'ze'#28'ChildSizing.ShrinkHorizontal'#7#14'crsScaleChilds'#26'ChildSizing.Sh'
|
||||
+'rinkVertical'#7#14'crsScaleChilds'#18'ChildSizing.Layout'#7#29'cclLeftToRig'
|
||||
+'htThenTopToBottom'#27'ChildSizing.ControlsPerLine'#2#1#13'Items.Strings'#1#6
|
||||
+#14'Case sensitive'#6#16'Whole words only'#6#19'Regular expressions'#0#8'Tab'
|
||||
+'Order'#2#1#4'Data'#10#7#0#0#0#3#0#0#0#2#2#2#0#0#11'TRadioGroup'#15'WhereRad'
|
||||
+'ioGroup'#4'Left'#2#6#6'Height'#2'R'#3'Top'#3#155#0#5'Width'#3'u'#1#7'Anchor'
|
||||
+'s'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'AutoFill'#9#7'Caption'#6#5'Where'#28
|
||||
+'ChildSizing.LeftRightSpacing'#2#6#28'ChildSizing.TopBottomSpacing'#2#6#29'C'
|
||||
+'hildSizing.HorizontalSpacing'#2#6#27'ChildSizing.VerticalSpacing'#2#6#29'Ch'
|
||||
+'ildSizing.EnlargeHorizontal'#7#24'crsHomogenousChildResize'#27'ChildSizing.'
|
||||
+'EnlargeVertical'#7#24'crsHomogenousChildResize'#28'ChildSizing.ShrinkHorizo'
|
||||
+'ntal'#7#14'crsScaleChilds'#26'ChildSizing.ShrinkVertical'#7#14'crsScaleChil'
|
||||
+'ds'#18'ChildSizing.Layout'#7#29'cclLeftToRightThenTopToBottom'#27'ChildSizi'
|
||||
+'ng.ControlsPerLine'#2#1#9'ItemIndex'#2#1#13'Items.Strings'#1#6#27'search al'
|
||||
+'l files in project'#6#21'search all open files'#6#21'search in directories'
|
||||
+#0#7'OnClick'#7#20'WhereRadioGroupClick'#8'TabOrder'#2#2#0#0#9'TGroupBox'#24
|
||||
+'DirectoryOptionsGroupBox'#4'Left'#2#6#6'Height'#3#137#0#3'Top'#3#240#0#5'Wi'
|
||||
+'dth'#3'u'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#7'Cap'
|
||||
+'tion'#6#17'Directory Options'#7'Enabled'#8#8'TabOrder'#2#3#0#6'TLabel'#14'D'
|
||||
+'irectoryLabel'#4'Left'#2#6#6'Height'#2#13#3'Top'#2#8#5'Width'#2'7'#7'Captio'
|
||||
+'n'#6#10'Directory:'#5'Color'#7#6'clNone'#11'ParentColor'#8#0#0#6'TLabel'#13
|
||||
+'FileMaskLabel'#4'Left'#2#6#6'Height'#2#13#3'Top'#2'&'#5'Width'#3#128#0#7'Ca'
|
||||
+'ption'#6#25'File mask (*;*.*;*.bak?):'#5'Color'#7#6'clNone'#11'ParentColor'
|
||||
+#8#0#0#9'TComboBox'#17'DirectoryComboBox'#4'Left'#2'X'#6'Height'#2#21#3'Top'
|
||||
+#2#6#5'Width'#3#241#0#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#16'AutoC'
|
||||
+'ompleteText'#11#22'cbactEndOfLineComplete'#20'cbactSearchAscending'#0#9'Max'
|
||||
+'Length'#2#0#8'TabOrder'#2#0#0#0#7'TBitBtn'#15'DirectoryBrowse'#4'Left'#3'O'
|
||||
+#1#6'Height'#2#21#3'Top'#2#6#5'Width'#2#21#7'Anchors'#11#5'akTop'#7'akRight'
|
||||
+#0#7'Caption'#6#3'...'#6'Layout'#7#10'blGlyphTop'#9'NumGlyphs'#2#0#7'OnClick'
|
||||
+#7#20'DirectoryBrowseClick'#8'TabOrder'#2#1#0#0#9'TComboBox'#16'FileMaskComb'
|
||||
+'oBox'#4'Left'#2#6#6'Height'#2#21#3'Top'#2'8'#5'Width'#3'C'#1#7'Anchors'#11#5
|
||||
+'akTop'#6'akLeft'#7'akRight'#0#16'AutoCompleteText'#11#22'cbactEndOfLineComp'
|
||||
+'lete'#20'cbactSearchAscending'#0#9'MaxLength'#2#0#8'TabOrder'#2#2#4'Text'#6
|
||||
+#16'*.pas;*.pp;*.inc'#0#0#9'TCheckBox'#22'IncludeSubDirsCheckBox'#4'Left'#2#6
|
||||
+#6'Height'#2#24#3'Top'#2'\'#5'Width'#3#154#0#7'Caption'#6#23'Include sub dir'
|
||||
+'ectories'#8'TabOrder'#2#3#0#0#0#7'TButton'#8'OKButton'#4'Left'#3#221#0#6'He'
|
||||
+'ight'#2#25#3'Top'#3#135#1#5'Width'#2'K'#7'Anchors'#11#7'akRight'#8'akBottom'
|
||||
+#0#20'BorderSpacing.Around'#2#6#25'BorderSpacing.InnerBorder'#2#4#7'Caption'
|
||||
+#6#2'OK'#7'Default'#9#11'ModalResult'#2#1#8'TabOrder'#2#4#0#0#7'TButton'#12
|
||||
+'CancelButton'#4'Left'#3'0'#1#6'Height'#2#25#3'Top'#3#135#1#5'Width'#2'K'#7
|
||||
+'Anchors'#11#7'akRight'#8'akBottom'#0#20'BorderSpacing.Around'#2#6#25'Border'
|
||||
+'Spacing.InnerBorder'#2#4#6'Cancel'#9#7'Caption'#6#6'Cancel'#11'ModalResult'
|
||||
+#2#2#8'TabOrder'#2#5#0#0#9'TComboBox'#19'ReplaceTextComboBox'#4'Left'#2'f'#6
|
||||
+'Height'#2#25#3'Top'#2'!'#5'Width'#3#21#1#7'Anchors'#11#5'akTop'#6'akLeft'#7
|
||||
+'akRight'#0#12'AutoComplete'#9#16'AutoCompleteText'#11#12'cbactEnabled'#22'c'
|
||||
,'bactEndOfLineComplete'#21'cbactRetainPrefixCase'#20'cbactSearchAscending'#0
|
||||
+#7'Enabled'#8#9'MaxLength'#2#0#8'TabOrder'#2#6#0#0#9'TCheckBox'#15'ReplaceCh'
|
||||
+'eckBox'#21'AnchorSideTop.Control'#7#19'ReplaceTextComboBox'#18'AnchorSideTo'
|
||||
+'p.Side'#7#9'asrCenter'#4'Left'#2#5#6'Height'#2#20#3'Top'#2'#'#5'Width'#2'I'
|
||||
+#7'Caption'#6#7'Replace'#7'Enabled'#8#8'OnChange'#7#21'ReplaceCheckBoxChange'
|
||||
+#8'TabOrder'#2#7#0#0#22'TSelectDirectoryDialog'#21'SelectDirectoryDialog'#5
|
||||
+'Title'#6#16'Select Directory'#11'FilterIndex'#2#0#7'Options'#11#15'ofFileMu'
|
||||
+'stExist'#14'ofEnableSizing'#12'ofViewDetail'#0#4'left'#3#4#1#3'top'#3#215#0
|
||||
+#0#0#0
|
||||
+'ints.MinWidth'#3#4#1#7'OnClose'#7#9'FormClose'#8'OnCreate'#7#10'FormCreate'
|
||||
+#8'Position'#7#14'poScreenCenter'#0#6'TLabel'#15'TextToFindLabel'#21'AnchorS'
|
||||
+'ideTop.Control'#7#18'TextToFindComboBox'#18'AnchorSideTop.Side'#7#9'asrCent'
|
||||
+'er'#4'Left'#2#6#6'Height'#2#13#3'Top'#2#10#5'Width'#2'J'#7'Caption'#6#13'Te'
|
||||
+'xt To Find:'#5'Color'#7#6'clNone'#11'ParentColor'#8#0#0#9'TComboBox'#18'Tex'
|
||||
+'tToFindComboBox'#4'Left'#2'f'#6'Height'#2#21#3'Top'#2#6#5'Width'#3'8'#1#7'A'
|
||||
+'nchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#12'AutoComplete'#9#16'AutoComple'
|
||||
+'teText'#11#12'cbactEnabled'#22'cbactEndOfLineComplete'#21'cbactRetainPrefix'
|
||||
+'Case'#20'cbactSearchAscending'#0#9'MaxLength'#2#0#8'TabOrder'#2#0#0#0#11'TC'
|
||||
+'heckGroup'#20'OptionsCheckGroupBox'#4'Left'#2#6#6'Height'#2's'#3'Top'#2'A'#5
|
||||
+'Width'#3#152#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#8'AutoFill'#9
|
||||
+#25'BorderSpacing.InnerBorder'#2#6#7'Caption'#6#7'Options'#28'ChildSizing.Le'
|
||||
+'ftRightSpacing'#2#6#28'ChildSizing.TopBottomSpacing'#2#6#29'ChildSizing.Hor'
|
||||
+'izontalSpacing'#2#6#27'ChildSizing.VerticalSpacing'#2#6#29'ChildSizing.Enla'
|
||||
+'rgeHorizontal'#7#24'crsHomogenousChildResize'#27'ChildSizing.EnlargeVertica'
|
||||
+'l'#7#24'crsHomogenousChildResize'#28'ChildSizing.ShrinkHorizontal'#7#14'crs'
|
||||
+'ScaleChilds'#26'ChildSizing.ShrinkVertical'#7#14'crsScaleChilds'#18'ChildSi'
|
||||
+'zing.Layout'#7#29'cclLeftToRightThenTopToBottom'#27'ChildSizing.ControlsPer'
|
||||
+'Line'#2#1#13'Items.Strings'#1#6#14'Case sensitive'#6#16'Whole words only'#6
|
||||
+#19'Regular expressions'#6#10'Multi Line'#0#8'TabOrder'#2#1#4'Data'#10#8#0#0
|
||||
+#0#4#0#0#0#2#2#2#2#0#0#11'TRadioGroup'#15'WhereRadioGroup'#4'Left'#2#6#6'Hei'
|
||||
+'ght'#2'R'#3'Top'#3#185#0#5'Width'#3#152#1#7'Anchors'#11#5'akTop'#6'akLeft'#7
|
||||
+'akRight'#0#8'AutoFill'#9#7'Caption'#6#5'Where'#28'ChildSizing.LeftRightSpac'
|
||||
+'ing'#2#6#28'ChildSizing.TopBottomSpacing'#2#6#29'ChildSizing.HorizontalSpac'
|
||||
+'ing'#2#6#27'ChildSizing.VerticalSpacing'#2#6#29'ChildSizing.EnlargeHorizont'
|
||||
+'al'#7#24'crsHomogenousChildResize'#27'ChildSizing.EnlargeVertical'#7#24'crs'
|
||||
+'HomogenousChildResize'#28'ChildSizing.ShrinkHorizontal'#7#14'crsScaleChilds'
|
||||
+#26'ChildSizing.ShrinkVertical'#7#14'crsScaleChilds'#18'ChildSizing.Layout'#7
|
||||
+#29'cclLeftToRightThenTopToBottom'#27'ChildSizing.ControlsPerLine'#2#1#9'Ite'
|
||||
+'mIndex'#2#1#13'Items.Strings'#1#6#27'search all files in project'#6#21'sear'
|
||||
+'ch all open files'#6#21'search in directories'#0#7'OnClick'#7#20'WhereRadio'
|
||||
+'GroupClick'#8'TabOrder'#2#2#0#0#9'TGroupBox'#24'DirectoryOptionsGroupBox'#4
|
||||
+'Left'#2#6#6'Height'#3#139#0#3'Top'#3#19#1#5'Width'#3#152#1#7'Anchors'#11#5
|
||||
+'akTop'#6'akLeft'#7'akRight'#8'akBottom'#0#7'Caption'#6#17'Directory Options'
|
||||
+#7'Enabled'#8#8'TabOrder'#2#3#0#6'TLabel'#14'DirectoryLabel'#4'Left'#2#6#6'H'
|
||||
+'eight'#2#13#3'Top'#2#8#5'Width'#2'7'#7'Caption'#6#10'Directory:'#5'Color'#7
|
||||
+#6'clNone'#11'ParentColor'#8#0#0#6'TLabel'#13'FileMaskLabel'#4'Left'#2#6#6'H'
|
||||
+'eight'#2#13#3'Top'#2'&'#5'Width'#3#128#0#7'Caption'#6#25'File mask (*;*.*;*'
|
||||
+'.bak?):'#5'Color'#7#6'clNone'#11'ParentColor'#8#0#0#9'TComboBox'#17'Directo'
|
||||
+'ryComboBox'#4'Left'#2'X'#6'Height'#2#21#3'Top'#2#6#5'Width'#3#4#1#7'Anchors'
|
||||
+#11#5'akTop'#6'akLeft'#7'akRight'#0#16'AutoCompleteText'#11#22'cbactEndOfLin'
|
||||
+'eComplete'#20'cbactSearchAscending'#0#9'MaxLength'#2#0#8'TabOrder'#2#0#0#0#7
|
||||
+'TBitBtn'#15'DirectoryBrowse'#4'Left'#3'b'#1#6'Height'#2#21#3'Top'#2#6#5'Wid'
|
||||
+'th'#2#21#7'Anchors'#11#5'akTop'#7'akRight'#0#7'Caption'#6#3'...'#6'Layout'#7
|
||||
+#10'blGlyphTop'#9'NumGlyphs'#2#0#7'OnClick'#7#20'DirectoryBrowseClick'#8'Tab'
|
||||
+'Order'#2#1#0#0#9'TComboBox'#16'FileMaskComboBox'#4'Left'#2#6#6'Height'#2#21
|
||||
+#3'Top'#2'8'#5'Width'#3'V'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#16
|
||||
+'AutoCompleteText'#11#22'cbactEndOfLineComplete'#20'cbactSearchAscending'#0#9
|
||||
+'MaxLength'#2#0#8'TabOrder'#2#2#4'Text'#6#16'*.pas;*.pp;*.inc'#0#0#9'TCheckB'
|
||||
+'ox'#22'IncludeSubDirsCheckBox'#4'Left'#2#6#6'Height'#2#20#3'Top'#2'\'#5'Wid'
|
||||
+'th'#3#154#0#7'Caption'#6#23'Include sub directories'#8'TabOrder'#2#3#0#0#0#7
|
||||
+'TButton'#8'OKButton'#4'Left'#3#0#1#6'Height'#2#25#3'Top'#3#172#1#5'Width'#2
|
||||
+'K'#7'Anchors'#11#7'akRight'#8'akBottom'#0#20'BorderSpacing.Around'#2#6#25'B'
|
||||
+'orderSpacing.InnerBorder'#2#4#7'Caption'#6#2'OK'#7'Default'#9#11'ModalResul'
|
||||
+'t'#2#1#8'TabOrder'#2#4#0#0#7'TButton'#12'CancelButton'#4'Left'#3'S'#1#6'Hei'
|
||||
+'ght'#2#25#3'Top'#3#172#1#5'Width'#2'K'#7'Anchors'#11#7'akRight'#8'akBottom'
|
||||
+#0#20'BorderSpacing.Around'#2#6#25'BorderSpacing.InnerBorder'#2#4#6'Cancel'#9
|
||||
+#7'Caption'#6#6'Cancel'#11'ModalResult'#2#2#8'TabOrder'#2#5#0#0#9'TComboBox'
|
||||
+#19'ReplaceTextComboBox'#4'Left'#2'f'#6'Height'#2#25#3'Top'#2'!'#5'Width'#3
|
||||
+'8'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#12'AutoComplete'#9#16'Au'
|
||||
,'toCompleteText'#11#12'cbactEnabled'#22'cbactEndOfLineComplete'#21'cbactReta'
|
||||
+'inPrefixCase'#20'cbactSearchAscending'#0#7'Enabled'#8#9'MaxLength'#2#0#8'Ta'
|
||||
+'bOrder'#2#6#0#0#9'TCheckBox'#15'ReplaceCheckBox'#21'AnchorSideTop.Control'#7
|
||||
+#19'ReplaceTextComboBox'#18'AnchorSideTop.Side'#7#9'asrCenter'#4'Left'#2#5#6
|
||||
+'Height'#2#20#3'Top'#2'#'#5'Width'#2'I'#7'Caption'#6#7'Replace'#7'Enabled'#8
|
||||
+#8'OnChange'#7#21'ReplaceCheckBoxChange'#8'TabOrder'#2#7#0#0#22'TSelectDirec'
|
||||
+'toryDialog'#21'SelectDirectoryDialog'#5'Title'#6#16'Select Directory'#11'Fi'
|
||||
+'lterIndex'#2#0#7'Options'#11#15'ofFileMustExist'#14'ofEnableSizing'#12'ofVi'
|
||||
+'ewDetail'#0#4'left'#3#4#1#3'top'#3#215#0#0#0#0
|
||||
]);
|
||||
|
||||
@ -25,7 +25,7 @@ interface
|
||||
uses
|
||||
Classes, SysUtils, LCLProc, LCLIntf, Controls, StdCtrls, Forms, Buttons,
|
||||
ExtCtrls, LResources, FileUtil, LazarusIDEStrConsts, Dialogs, SynEditTypes,
|
||||
IDEDialogs, InputHistory;
|
||||
IDEDialogs, IDEWindowIntf, InputHistory;
|
||||
|
||||
type
|
||||
{ TLazFindInFilesDialog }
|
||||
@ -48,6 +48,7 @@ type
|
||||
TextToFindLabel: TLabel;
|
||||
WhereRadioGroup: TRadioGroup;
|
||||
procedure DirectoryBrowseClick(Sender: TObject);
|
||||
procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
|
||||
procedure FormCreate(Sender: TObject);
|
||||
procedure ReplaceCheckBoxChange(Sender: TObject);
|
||||
procedure WhereRadioGroupClick(Sender: TObject);
|
||||
@ -111,6 +112,12 @@ begin
|
||||
StoreIDEFileDialog(SelectDirectoryDialog);
|
||||
end;
|
||||
|
||||
procedure TLazFindInFilesDialog.FormClose(Sender: TObject;
|
||||
var CloseAction: TCloseAction);
|
||||
begin
|
||||
IDEDialogLayoutList.SaveLayout(Self);
|
||||
end;
|
||||
|
||||
procedure TLazFindInFilesDialog.FormCreate(Sender: TObject);
|
||||
begin
|
||||
Caption := srkmecFindInFiles;
|
||||
@ -122,6 +129,7 @@ begin
|
||||
OptionsCheckGroupBox.Items[0] := lisFindFileCaseSensitive;
|
||||
OptionsCheckGroupBox.Items[1] := lisFindFileWholeWordsOnly;
|
||||
OptionsCheckGroupBox.Items[2] := lisFindFileRegularExpressions;
|
||||
OptionsCheckGroupBox.Items[3] := lisFindFileMultiLine;
|
||||
|
||||
WhereRadioGroup.Caption:=lisFindFileWhere;
|
||||
WhereRadioGroup.Items[0] := lisFindFilesearchAllFilesInProject;
|
||||
@ -141,6 +149,8 @@ begin
|
||||
|
||||
UpdateReplaceCheck;
|
||||
DirectoryOptionsGroupBox.Enabled:=WhereRadioGroup.ItemIndex=2;
|
||||
|
||||
IDEDialogLayoutList.ApplyLayout(Self,420,460);
|
||||
end;
|
||||
|
||||
procedure TLazFindInFilesDialog.ReplaceCheckBoxChange(Sender: TObject);
|
||||
@ -153,6 +163,7 @@ begin
|
||||
OptionsCheckGroupBox.Checked[0] := fifMatchCase in NewOptions;
|
||||
OptionsCheckGroupBox.Checked[1] := fifWholeWord in NewOptions;
|
||||
OptionsCheckGroupBox.Checked[2] := fifRegExpr in NewOptions;
|
||||
OptionsCheckGroupBox.Checked[3] := fifMultiLine in NewOptions;
|
||||
DirectoryOptionsGroupBox.Enabled := fifSearchDirectories in NewOptions;
|
||||
IncludeSubDirsCheckBox.Checked := fifIncludeSubDirs in NewOptions;
|
||||
ReplaceCheckBox.Checked := [fifReplace,fifReplaceAll]*NewOptions<>[];
|
||||
@ -170,6 +181,7 @@ begin
|
||||
if OptionsCheckGroupBox.Checked[0] then Include(Result, fifMatchCase);
|
||||
if OptionsCheckGroupBox.Checked[1] then Include(Result, fifWholeWord);
|
||||
if OptionsCheckGroupBox.Checked[2] then Include(Result, fifRegExpr);
|
||||
if OptionsCheckGroupBox.Checked[3] then Include(Result, fifMultiLine);
|
||||
if IncludeSubDirsCheckBox.Checked then Include(Result, fifIncludeSubDirs);
|
||||
if ReplaceCheckBox.Checked then Include(Result, fifReplace);
|
||||
|
||||
@ -186,6 +198,7 @@ begin
|
||||
if OptionsCheckGroupBox.Checked[0] then Include(Result, ssoMatchCase);
|
||||
if OptionsCheckGroupBox.Checked[1] then Include(Result, ssoWholeWord);
|
||||
if OptionsCheckGroupBox.Checked[2] then Include(Result, ssoRegExpr);
|
||||
if OptionsCheckGroupBox.Checked[3] then Include(Result, ssoRegExprMultiLine);
|
||||
if ReplaceCheckBox.Checked then Include(Result, ssoReplace);
|
||||
end;//GetSynOptions
|
||||
|
||||
@ -199,6 +212,7 @@ begin
|
||||
OptionsCheckGroupBox.Checked[0] := ssoMatchCase in NewOptions;
|
||||
OptionsCheckGroupBox.Checked[1] := ssoWholeWord in NewOptions;
|
||||
OptionsCheckGroupBox.Checked[2] := ssoRegExpr in NewOptions;
|
||||
OptionsCheckGroupBox.Checked[3] := ssoRegExprMultiLine in NewOptions;
|
||||
ReplaceCheckBox.Checked := ([ssoReplace,ssoReplaceAll]*NewOptions <> []);
|
||||
|
||||
UpdateReplaceCheck;
|
||||
|
||||
@ -675,6 +675,7 @@ begin
|
||||
SetFlag(sesoReplaceAll,fifReplaceAll in TheOptions);
|
||||
SetFlag(sesoMatchCase,fifMatchCase in TheOptions);
|
||||
SetFlag(sesoRegExpr,fifRegExpr in TheOptions);
|
||||
SetFlag(sesoMultiLine,fifMultiLine in TheOptions);
|
||||
fRecursive:= (fifIncludeSubDirs in TheOptions);
|
||||
fSearchProject:= (fifSearchProject in TheOptions);
|
||||
fSearchOpen:= (fifSearchOpen in TheOptions);
|
||||
@ -689,6 +690,7 @@ begin
|
||||
if sesoReplace in fFlags then include(Result,fifReplace);
|
||||
if sesoReplaceAll in fFlags then include(Result,fifReplaceAll);
|
||||
if sesoRegExpr in fFlags then include(Result,fifRegExpr);
|
||||
if sesoMultiLine in fFlags then include(Result,fifMultiLine);
|
||||
if fRecursive then include(Result,fifIncludeSubDirs);
|
||||
if fSearchProject then include(Result, fifSearchProject);
|
||||
if fSearchOpen then include(Result,fifSearchOpen);
|
||||
|
||||
@ -149,7 +149,10 @@ type
|
||||
{ TInputHistories }
|
||||
|
||||
TLazFindInFileSearchOption = (
|
||||
fifMatchCase, fifWholeWord, fifRegExpr,
|
||||
fifMatchCase,
|
||||
fifWholeWord,
|
||||
fifRegExpr,
|
||||
fifMultiLine,
|
||||
fifSearchProject, // search in all project files
|
||||
fifSearchOpen, // search in all open files in editor
|
||||
fifSearchDirectories,// search in directories
|
||||
@ -270,6 +273,7 @@ const
|
||||
'MatchCase',
|
||||
'WholeWord',
|
||||
'RegExpr',
|
||||
'MultiLine',
|
||||
'SearchProject',
|
||||
'SearchOpen',
|
||||
'SearchDirectories',
|
||||
|
||||
@ -2254,6 +2254,7 @@ resourcestring
|
||||
lisFindFileCaseSensitive = 'Case sensitive';
|
||||
lisFindFileWholeWordsOnly = 'Whole words only';
|
||||
lisFindFileRegularExpressions = 'Regular expressions';
|
||||
lisFindFileMultiLine = 'Multi line pattern';
|
||||
lisFindFileWhere = 'Where';
|
||||
lisFindFilesearchAllFilesInProject = 'search all files in project';
|
||||
lisFindFilesearchAllOpenFiles = 'search all open files';
|
||||
|
||||
Loading…
Reference in New Issue
Block a user