fixed macro description ExeExt, fixed abort on lfm repair during project loading, fixed uninitialized result for HasUnitRegisterProc, find/replace dialog now can enable/disable replace by user - needed for apple human interface guide lines

git-svn-id: trunk@15941 -
This commit is contained in:
mattias 2008-08-03 20:00:49 +00:00
parent 57334df646
commit bfba06a2d8
9 changed files with 242 additions and 326 deletions

View File

@ -2392,6 +2392,7 @@ end;
function TCustomFormEditor.TranslateKeyToDesignerCommand(Key: word;
Shift: TShiftState): word;
begin
//debugln(['TCustomFormEditor.TranslateKeyToDesignerCommand ',DbgSName(TDesignerIDECommandForm),' ',Key,' ',dbgs(Shift)]);
Result:=EditorOpts.KeyMap.TranslateKey(Key,Shift,TDesignerIDECommandForm);
end;

View File

@ -1531,7 +1531,7 @@ begin
AMacroList.Add(TTransferMacro.Create('LazarusDir','',
lisLazarusDirectory,@MacroFuncLazarusDir,[]));
AMacroList.Add(TTransferMacro.Create('ExeExt','',
lisLazarusDirectory,@MacroFuncExeExt,[]));
lisFileExtensionOfPrograms, @MacroFuncExeExt, []));
AMacroList.Add(TTransferMacro.Create('LanguageID','',
lisLazarusLanguageID,@MacroFuncLanguageID,[]));
AMacroList.Add(TTransferMacro.Create('LanguageName','',

View File

@ -19,38 +19,37 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
AnchorSideTop.Control = TextToFindComboBox
AnchorSideTop.Side = asrCenter
Left = 6
Height = 24
Top = 14
Width = 119
Height = 18
Top = 13
Width = 105
Alignment = taRightJustify
BorderSpacing.Left = 6
Caption = 'TextToFindLabel'
FocusControl = TextToFindComboBox
ParentColor = False
end
object ReplaceWithLabel: TLabel
object ReplaceWithCheckbox: TCheckBox
AnchorSideLeft.Control = Owner
AnchorSideTop.Control = ReplaceTextComboBox
AnchorSideTop.Side = asrCenter
Left = 6
Height = 24
Top = 49
Width = 136
Alignment = taRightJustify
Height = 18
Top = 40
Width = 159
BorderSpacing.Left = 6
Caption = 'ReplaceWithLabel'
FocusControl = ReplaceTextComboBox
ParentColor = False
Caption = 'ReplaceWithCheckbox'
OnChange = ReplaceWithCheckboxChange
TabOrder = 7
end
object TextToFindComboBox: TComboBox
AnchorSideLeft.Control = TextToFindLabel
AnchorSideLeft.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 137
Height = 29
Left = 123
Height = 21
Top = 12
Width = 277
Width = 291
Anchors = [akTop, akLeft, akRight]
AutoComplete = True
AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactRetainPrefixCase, cbactSearchAscending]
@ -62,16 +61,16 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
Text = 'TextToFindComboBox'
end
object ReplaceTextComboBox: TComboBox
AnchorSideLeft.Control = ReplaceWithLabel
AnchorSideLeft.Control = ReplaceWithCheckbox
AnchorSideLeft.Side = asrBottom
AnchorSideTop.Control = TextToFindComboBox
AnchorSideTop.Side = asrBottom
AnchorSideRight.Control = Owner
AnchorSideRight.Side = asrBottom
Left = 154
Height = 29
Top = 47
Width = 260
Left = 177
Height = 21
Top = 39
Width = 237
Anchors = [akTop, akLeft, akRight]
AutoComplete = True
AutoCompleteText = [cbactEnabled, cbactEndOfLineComplete, cbactRetainPrefixCase, cbactSearchAscending]
@ -88,24 +87,24 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
AnchorSideTop.Side = asrBottom
AnchorSideBottom.Control = BtnPanel
Left = 6
Height = 243
Top = 82
Height = 259
Top = 66
Width = 199
Anchors = [akTop, akLeft, akBottom]
BorderSpacing.Left = 6
BorderSpacing.Top = 6
BorderSpacing.Bottom = 6
Caption = 'OptionsGroupBox'
ClientHeight = 222
ClientWidth = 195
ClientHeight = 237
ClientWidth = 191
TabOrder = 2
OnResize = OptionsGroupBoxResize
object PromptOnReplaceCheckBox: TCheckBox
AnchorSideTop.Side = asrBottom
Left = 6
Height = 23
Top = 152
Width = 183
Height = 18
Top = 132
Width = 179
Align = alTop
BorderSpacing.Top = 6
BorderSpacing.Around = 6
@ -119,9 +118,9 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
object MultiLineCheckBox: TCheckBox
AnchorSideTop.Side = asrBottom
Left = 6
Height = 23
Top = 117
Width = 183
Height = 18
Top = 102
Width = 179
Align = alTop
BorderSpacing.Top = 6
BorderSpacing.Around = 6
@ -133,9 +132,9 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
object RegularExpressionsCheckBox: TCheckBox
AnchorSideTop.Side = asrBottom
Left = 6
Height = 23
Top = 82
Width = 183
Height = 18
Top = 72
Width = 179
Align = alTop
BorderSpacing.Top = 6
BorderSpacing.Around = 6
@ -147,9 +146,9 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
object WholeWordsOnlyCheckBox: TCheckBox
AnchorSideTop.Side = asrBottom
Left = 6
Height = 23
Top = 47
Width = 183
Height = 18
Top = 42
Width = 179
Align = alTop
BorderSpacing.Top = 6
BorderSpacing.Around = 6
@ -161,9 +160,9 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
object CaseSensitiveCheckBox: TCheckBox
AnchorSideTop.Side = asrBottom
Left = 6
Height = 23
Height = 18
Top = 12
Width = 183
Width = 179
Align = alTop
BorderSpacing.Top = 6
BorderSpacing.Around = 6
@ -180,7 +179,7 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
AnchorSideTop.Side = asrBottom
Left = 211
Height = 74
Top = 162
Top = 146
Width = 199
BorderSpacing.Around = 6
Caption = 'ScopeGroupBox'
@ -191,22 +190,22 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
ChildSizing.ShrinkVertical = crsHomogenousSpaceResize
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1
ClientHeight = 53
ClientWidth = 195
ClientHeight = 52
ClientWidth = 191
TabOrder = 4
object SelectedRadioButton: TRadioButton
Left = 5
Height = 23
Top = 3
Width = 184
Left = 6
Height = 18
Top = 6
Width = 179
Caption = 'SelectedRadioButton'
TabOrder = 0
end
object GlobalRadioButton: TRadioButton
Left = 5
Height = 23
Top = 29
Width = 184
Left = 6
Height = 18
Top = 30
Width = 179
Caption = 'GlobalRadioButton'
Checked = True
State = cbChecked
@ -220,7 +219,7 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
AnchorSideTop.Side = asrBottom
Left = 211
Height = 74
Top = 242
Top = 226
Width = 199
BorderSpacing.Around = 6
Caption = 'DirectionGroupBox'
@ -231,20 +230,22 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
ChildSizing.ShrinkVertical = crsHomogenousSpaceResize
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1
ClientHeight = 53
ClientWidth = 195
ClientHeight = 52
ClientWidth = 191
TabOrder = 5
object BackwardRadioButton: TRadioButton
Height = 23
Top = 3
Width = 196
Left = 6
Height = 18
Top = 6
Width = 179
Caption = 'BackwardRadioButton'
TabOrder = 0
end
object ForwardRadioButton: TRadioButton
Height = 23
Top = 29
Width = 196
Left = 6
Height = 18
Top = 30
Width = 179
Caption = 'ForwardRadioButton'
Checked = True
State = cbChecked
@ -258,7 +259,7 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
AnchorSideTop.Side = asrBottom
Left = 211
Height = 74
Top = 82
Top = 66
Width = 199
BorderSpacing.Around = 6
Caption = 'OriginGroupBox'
@ -269,13 +270,14 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
ChildSizing.ShrinkVertical = crsHomogenousSpaceResize
ChildSizing.Layout = cclLeftToRightThenTopToBottom
ChildSizing.ControlsPerLine = 1
ClientHeight = 53
ClientWidth = 195
ClientHeight = 52
ClientWidth = 191
TabOrder = 3
object FromCursorRadioButton: TRadioButton
Height = 23
Top = 3
Width = 213
Left = 6
Height = 18
Top = 6
Width = 179
AutoSize = False
Caption = 'FromCursorRadioButton'
Checked = True
@ -283,9 +285,10 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
TabOrder = 0
end
object EntireScopeRadioButton: TRadioButton
Height = 23
Top = 29
Width = 213
Left = 6
Height = 18
Top = 30
Width = 179
AutoSize = False
Caption = 'EntireScopeRadioButton'
TabOrder = 1
@ -303,10 +306,10 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
TabOrder = 6
object ReplaceAllButton: TBitBtn
AnchorSideBottom.Side = asrBottom
Left = 216
Left = 221
Height = 30
Top = 6
Width = 46
Width = 53
Align = alRight
AutoSize = True
BorderSpacing.Around = 6
@ -318,10 +321,10 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
end
object OKButton: TBitBtn
AnchorSideBottom.Side = asrBottom
Left = 268
Left = 280
Height = 30
Top = 6
Width = 56
Width = 55
Align = alRight
AutoSize = True
BorderSpacing.Around = 6
@ -335,10 +338,10 @@ object LazFindReplaceDialog: TLazFindReplaceDialog
object CancelButton: TBitBtn
AnchorSideRight.Side = asrBottom
AnchorSideBottom.Side = asrBottom
Left = 330
Left = 341
Height = 30
Top = 6
Width = 84
Width = 73
Align = alRight
AutoSize = True
BorderSpacing.Around = 6

View File

@ -9,240 +9,118 @@ LazarusResources.Add('TLazFindReplaceDialog','FORMDATA',[
+'hangeBounds'#7#16'FormChangeBounds'#7'OnClose'#7#9'FormClose'#10'LCLVersion'
+#6#6'0.9.25'#0#6'TLabel'#15'TextToFindLabel'#22'AnchorSideLeft.Control'#7#5
+'Owner'#21'AnchorSideTop.Control'#7#18'TextToFindComboBox'#18'AnchorSideTop.'
+'Side'#7#9'asrCenter'#4'Left'#2#6#6'Height'#2#24#3'Top'#2#14#5'Width'#2'w'#9
+'Side'#7#9'asrCenter'#4'Left'#2#6#6'Height'#2#18#3'Top'#2#13#5'Width'#2'i'#9
+'Alignment'#7#14'taRightJustify'#18'BorderSpacing.Left'#2#6#7'Caption'#6#15
+'TextToFindLabel'#12'FocusControl'#7#18'TextToFindComboBox'#11'ParentColor'#8
+#0#0#6'TLabel'#16'ReplaceWithLabel'#22'AnchorSideLeft.Control'#7#5'Owner'#21
+'AnchorSideTop.Control'#7#19'ReplaceTextComboBox'#18'AnchorSideTop.Side'#7#9
+'asrCenter'#4'Left'#2#6#6'Height'#2#24#3'Top'#2'1'#5'Width'#3#136#0#9'Alignm'
+'ent'#7#14'taRightJustify'#18'BorderSpacing.Left'#2#6#7'Caption'#6#16'Replac'
+'eWithLabel'#12'FocusControl'#7#19'ReplaceTextComboBox'#11'ParentColor'#8#0#0
+#9'TComboBox'#18'TextToFindComboBox'#22'AnchorSideLeft.Control'#7#15'TextToF'
+'indLabel'#19'AnchorSideLeft.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'
+#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#3#137#0#6'Height'
+#2#29#3'Top'#2#12#5'Width'#3#21#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'
+#0#12'AutoComplete'#9#16'AutoCompleteText'#11#12'cbactEnabled'#22'cbactEndOf'
+'LineComplete'#21'cbactRetainPrefixCase'#20'cbactSearchAscending'#0#18'Borde'
+'rSpacing.Left'#2#6#20'BorderSpacing.Around'#2#6#9'MaxLength'#2#0#9'OnKeyDow'
+'n'#7#25'TextToFindComboboxKeyDown'#8'TabOrder'#2#0#4'Text'#6#18'TextToFindC'
+'omboBox'#0#0#9'TComboBox'#19'ReplaceTextComboBox'#22'AnchorSideLeft.Control'
+#7#16'ReplaceWithLabel'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSide'
+'Top.Control'#7#18'TextToFindComboBox'#18'AnchorSideTop.Side'#7#9'asrBottom'
+#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBott'
+'om'#4'Left'#3#154#0#6'Height'#2#29#3'Top'#2'/'#5'Width'#3#4#1#7'Anchors'#11
+#5'akTop'#6'akLeft'#7'akRight'#0#12'AutoComplete'#9#16'AutoCompleteText'#11
+#12'cbactEnabled'#22'cbactEndOfLineComplete'#21'cbactRetainPrefixCase'#20'cb'
+'actSearchAscending'#0#18'BorderSpacing.Left'#2#6#20'BorderSpacing.Around'#2
+#6#9'MaxLength'#2#0#9'OnKeyDown'#7#25'TextToFindComboboxKeyDown'#8'TabOrder'
+#2#1#4'Text'#6#19'ReplaceTextComboBox'#0#0#9'TGroupBox'#15'OptionsGroupBox'
+#22'AnchorSideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#19'Replac'
+'eTextComboBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#24'AnchorSideBottom.Co'
+'ntrol'#7#8'BtnPanel'#4'Left'#2#6#6'Height'#3#243#0#3'Top'#2'R'#5'Width'#3
+#199#0#7'Anchors'#11#5'akTop'#6'akLeft'#8'akBottom'#0#18'BorderSpacing.Left'
+#2#6#17'BorderSpacing.Top'#2#6#20'BorderSpacing.Bottom'#2#6#7'Caption'#6#15
+'OptionsGroupBox'#12'ClientHeight'#3#222#0#11'ClientWidth'#3#195#0#8'TabOrde'
+'r'#2#2#8'OnResize'#7#21'OptionsGroupBoxResize'#0#9'TCheckBox'#23'PromptOnRe'
+'placeCheckBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#2
+#23#3'Top'#3#152#0#5'Width'#3#183#0#5'Align'#7#5'alTop'#17'BorderSpacing.Top'
+#2#6#20'BorderSpacing.Around'#2#6#7'Caption'#6#23'PromptOnReplaceCheckBox'#7
+'Checked'#9#14'ParentShowHint'#8#8'ShowHint'#9#5'State'#7#9'cbChecked'#8'Tab'
+'Order'#2#4#0#0#9'TCheckBox'#17'MultiLineCheckBox'#18'AnchorSideTop.Side'#7#9
+'asrBottom'#4'Left'#2#6#6'Height'#2#23#3'Top'#2'u'#5'Width'#3#183#0#5'Align'
+#7#5'alTop'#17'BorderSpacing.Top'#2#6#20'BorderSpacing.Around'#2#6#7'Caption'
+#6#17'MultiLineCheckBox'#14'ParentShowHint'#8#8'ShowHint'#9#8'TabOrder'#2#3#0
+#0#9'TCheckBox'#26'RegularExpressionsCheckBox'#18'AnchorSideTop.Side'#7#9'as'
+'rBottom'#4'Left'#2#6#6'Height'#2#23#3'Top'#2'R'#5'Width'#3#183#0#5'Align'#7
+#5'alTop'#17'BorderSpacing.Top'#2#6#20'BorderSpacing.Around'#2#6#7'Caption'#6
+#26'RegularExpressionsCheckBox'#14'ParentShowHint'#8#8'ShowHint'#9#8'TabOrde'
+'r'#2#2#0#0#9'TCheckBox'#22'WholeWordsOnlyCheckBox'#18'AnchorSideTop.Side'#7
+#9'asrBottom'#4'Left'#2#6#6'Height'#2#23#3'Top'#2'/'#5'Width'#3#183#0#5'Alig'
+'n'#7#5'alTop'#17'BorderSpacing.Top'#2#6#20'BorderSpacing.Around'#2#6#7'Capt'
+'ion'#6#22'WholeWordsOnlyCheckBox'#14'ParentShowHint'#8#8'ShowHint'#9#8'TabO'
+'rder'#2#1#0#0#9'TCheckBox'#21'CaseSensitiveCheckBox'#18'AnchorSideTop.Side'
+#7#9'asrBottom'#4'Left'#2#6#6'Height'#2#23#3'Top'#2#12#5'Width'#3#183#0#5'Al'
+'ign'#7#5'alTop'#17'BorderSpacing.Top'#2#6#20'BorderSpacing.Around'#2#6#7'Ca'
+'ption'#6#21'CaseSensitiveCheckBox'#14'ParentShowHint'#8#8'ShowHint'#9#8'Tab'
+'Order'#2#0#0#0#0#9'TGroupBox'#13'ScopeGroupBox'#22'AnchorSideLeft.Control'#7
+#15'OptionsGroupBox'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop'
+'.Control'#7#14'OriginGroupBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'
,#3#211#0#6'Height'#2'J'#3'Top'#3#162#0#5'Width'#3#199#0#20'BorderSpacing.Aro'
+'und'#2#6#7'Caption'#6#13'ScopeGroupBox'#28'ChildSizing.LeftRightSpacing'#2#6
+#29'ChildSizing.EnlargeHorizontal'#7#24'crsHomogenousChildResize'#27'ChildSi'
+'zing.EnlargeVertical'#7#24'crsHomogenousSpaceResize'#28'ChildSizing.ShrinkH'
+'orizontal'#7#24'crsHomogenousSpaceResize'#26'ChildSizing.ShrinkVertical'#7
+#24'crsHomogenousSpaceResize'#18'ChildSizing.Layout'#7#29'cclLeftToRightThen'
+'TopToBottom'#27'ChildSizing.ControlsPerLine'#2#1#12'ClientHeight'#2'5'#11'C'
+'lientWidth'#3#195#0#8'TabOrder'#2#4#0#12'TRadioButton'#19'SelectedRadioButt'
+'on'#4'Left'#2#5#6'Height'#2#23#3'Top'#2#3#5'Width'#3#184#0#7'Caption'#6#19
+'SelectedRadioButton'#8'TabOrder'#2#0#0#0#12'TRadioButton'#17'GlobalRadioBut'
+'ton'#4'Left'#2#5#6'Height'#2#23#3'Top'#2#29#5'Width'#3#184#0#7'Caption'#6#17
+'GlobalRadioButton'#7'Checked'#9#5'State'#7#9'cbChecked'#8'TabOrder'#2#1#0#0
+#0#9'TGroupBox'#17'DirectionGroupBox'#22'AnchorSideLeft.Control'#7#15'Option'
+'sGroupBox'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'
+#7#13'ScopeGroupBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#3#211#0#6
+'Height'#2'J'#3'Top'#3#242#0#5'Width'#3#199#0#20'BorderSpacing.Around'#2#6#7
+'Caption'#6#17'DirectionGroupBox'#28'ChildSizing.LeftRightSpacing'#2#6#29'Ch'
+'ildSizing.EnlargeHorizontal'#7#24'crsHomogenousChildResize'#27'ChildSizing.'
+'EnlargeVertical'#7#24'crsHomogenousSpaceResize'#28'ChildSizing.ShrinkHorizo'
+'ntal'#7#24'crsHomogenousSpaceResize'#26'ChildSizing.ShrinkVertical'#7#24'cr'
+'sHomogenousSpaceResize'#18'ChildSizing.Layout'#7#29'cclLeftToRightThenTopTo'
+'Bottom'#27'ChildSizing.ControlsPerLine'#2#1#12'ClientHeight'#2'5'#11'Client'
+'Width'#3#195#0#8'TabOrder'#2#5#0#12'TRadioButton'#19'BackwardRadioButton'#6
+'Height'#2#23#3'Top'#2#3#5'Width'#3#196#0#7'Caption'#6#19'BackwardRadioButto'
+'n'#8'TabOrder'#2#0#0#0#12'TRadioButton'#18'ForwardRadioButton'#6'Height'#2
+#23#3'Top'#2#29#5'Width'#3#196#0#7'Caption'#6#18'ForwardRadioButton'#7'Check'
+'ed'#9#5'State'#7#9'cbChecked'#8'TabOrder'#2#1#0#0#0#9'TGroupBox'#14'OriginG'
+'roupBox'#22'AnchorSideLeft.Control'#7#15'OptionsGroupBox'#19'AnchorSideLeft'
+'.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#19'ReplaceTextComboBox'#18
+'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#3#211#0#6'Height'#2'J'#3'Top'#2
+'R'#5'Width'#3#199#0#20'BorderSpacing.Around'#2#6#7'Caption'#6#14'OriginGrou'
+'pBox'#28'ChildSizing.LeftRightSpacing'#2#6#29'ChildSizing.EnlargeHorizontal'
+#7#24'crsHomogenousChildResize'#27'ChildSizing.EnlargeVertical'#7#24'crsHomo'
+'genousSpaceResize'#28'ChildSizing.ShrinkHorizontal'#7#24'crsHomogenousSpace'
+'Resize'#26'ChildSizing.ShrinkVertical'#7#24'crsHomogenousSpaceResize'#18'Ch'
+'ildSizing.Layout'#7#29'cclLeftToRightThenTopToBottom'#27'ChildSizing.Contro'
+'lsPerLine'#2#1#12'ClientHeight'#2'5'#11'ClientWidth'#3#195#0#8'TabOrder'#2#3
+#0#12'TRadioButton'#21'FromCursorRadioButton'#6'Height'#2#23#3'Top'#2#3#5'Wi'
+'dth'#3#213#0#8'AutoSize'#8#7'Caption'#6#21'FromCursorRadioButton'#7'Checked'
+#9#5'State'#7#9'cbChecked'#8'TabOrder'#2#0#0#0#12'TRadioButton'#22'EntireSco'
+'peRadioButton'#6'Height'#2#23#3'Top'#2#29#5'Width'#3#213#0#8'AutoSize'#8#7
+'Caption'#6#22'EntireScopeRadioButton'#8'TabOrder'#2#1#0#0#0#6'TPanel'#8'Btn'
+'Panel'#6'Height'#2'*'#3'Top'#3'K'#1#5'Width'#3#164#1#5'Align'#7#8'alBottom'
+#8'AutoSize'#9#10'BevelOuter'#7#6'bvNone'#12'ClientHeight'#2'*'#11'ClientWid'
+'th'#3#164#1#8'TabOrder'#2#6#0#7'TBitBtn'#16'ReplaceAllButton'#21'AnchorSide'
+'Bottom.Side'#7#9'asrBottom'#4'Left'#3#216#0#6'Height'#2#30#3'Top'#2#6#5'Wid'
+'th'#2'.'#5'Align'#7#7'alRight'#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7
+'Caption'#6#4'&All'#4'Kind'#7#5'bkAll'#9'NumGlyphs'#2#0#7'OnClick'#7#21'Repl'
+'aceAllButtonClick'#8'TabOrder'#2#0#0#0#7'TBitBtn'#8'OKButton'#21'AnchorSide'
+'Bottom.Side'#7#9'asrBottom'#4'Left'#3#12#1#6'Height'#2#30#3'Top'#2#6#5'Widt'
+'h'#2'8'#5'Align'#7#7'alRight'#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7
+'Caption'#6#3'&OK'#7'Default'#9#4'Kind'#7#4'bkOK'#9'NumGlyphs'#2#0#7'OnClick'
+#7#13'OkButtonClick'#8'TabOrder'#2#1#0#0#7'TBitBtn'#12'CancelButton'#20'Anch'
+'orSideRight.Side'#7#9'asrBottom'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4
+'Left'#3'J'#1#6'Height'#2#30#3'Top'#2#6#5'Width'#2'T'#5'Align'#7#7'alRight'#8
+'AutoSize'#9#20'BorderSpacing.Around'#2#6#6'Cancel'#9#7'Caption'#6#6'Cancel'
+#4'Kind'#7#8'bkCancel'#11'ModalResult'#2#2#9'NumGlyphs'#2#0#7'OnClick'#7#17
+'CancelButtonClick'#8'TabOrder'#2#2#0#0#0#0#21'TLazFindReplaceDialog'#20'Laz'
+'FindReplaceDialog'#4'Left'#3'F'#1#6'Height'#3'u'#1#3'Top'#3#184#0#5'Width'#3
+#164#1#13'ActiveControl'#7#18'TextToFindComboBox'#11'BorderIcons'#11#12'biSy'
+'stemMenu'#0#7'Caption'#6#20'LazFindReplaceDialog'#12'ClientHeight'#3'u'#1#11
+'ClientWidth'#3#164#1#21'Constraints.MinHeight'#3'8'#1#20'Constraints.MinWid'
+'th'#3','#1#10'KeyPreview'#9#14'OnChangeBounds'#7#16'FormChangeBounds'#7'OnC'
+'lose'#7#9'FormClose'#10'LCLVersion'#6#6'0.9.25'#0#6'TLabel'#15'TextToFindLa'
,'bel'#22'AnchorSideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#18'T'
+'extToFindComboBox'#18'AnchorSideTop.Side'#7#9'asrCenter'#4'Left'#2#6#6'Heig'
+'ht'#2#24#3'Top'#2#14#5'Width'#2'w'#9'Alignment'#7#14'taRightJustify'#18'Bor'
+'derSpacing.Left'#2#6#7'Caption'#6#15'TextToFindLabel'#12'FocusControl'#7#18
+'TextToFindComboBox'#11'ParentColor'#8#0#0#6'TLabel'#16'ReplaceWithLabel'#22
+'AnchorSideLeft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#19'ReplaceTe'
+'xtComboBox'#18'AnchorSideTop.Side'#7#9'asrCenter'#4'Left'#2#6#6'Height'#2#24
+#3'Top'#2'1'#5'Width'#3#136#0#9'Alignment'#7#14'taRightJustify'#18'BorderSpa'
+'cing.Left'#2#6#7'Caption'#6#16'ReplaceWithLabel'#12'FocusControl'#7#19'Repl'
+'aceTextComboBox'#11'ParentColor'#8#0#0#9'TComboBox'#18'TextToFindComboBox'
+#22'AnchorSideLeft.Control'#7#15'TextToFindLabel'#19'AnchorSideLeft.Side'#7#9
+'asrBottom'#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7
+#9'asrBottom'#4'Left'#3#137#0#6'Height'#2#29#3'Top'#2#12#5'Width'#3#21#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#18'BorderSpacing.Left'#2#6#20'BorderSpacin'
+'g.Around'#2#6#9'MaxLength'#2#0#9'OnKeyDown'#7#25'TextToFindComboboxKeyDown'
+#8'TabOrder'#2#0#4'Text'#6#18'TextToFindComboBox'#0#0#9'TComboBox'#19'Replac'
+'eTextComboBox'#22'AnchorSideLeft.Control'#7#16'ReplaceWithLabel'#19'AnchorS'
+'ideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#18'TextToFindCombo'
+'Box'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#5
+'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#3#154#0#6'Height'#2
+#29#3'Top'#2'/'#5'Width'#3#4#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0
+#12'AutoComplete'#9#16'AutoCompleteText'#11#12'cbactEnabled'#22'cbactEndOfLi'
+'neComplete'#21'cbactRetainPrefixCase'#20'cbactSearchAscending'#0#18'BorderS'
+'pacing.Left'#2#6#20'BorderSpacing.Around'#2#6#9'MaxLength'#2#0#9'OnKeyDown'
+#7#25'TextToFindComboboxKeyDown'#8'TabOrder'#2#1#4'Text'#6#19'ReplaceTextCom'
+'boBox'#0#0#9'TGroupBox'#15'OptionsGroupBox'#22'AnchorSideLeft.Control'#7#5
+'Owner'#21'AnchorSideTop.Control'#7#19'ReplaceTextComboBox'#18'AnchorSideTop'
+'.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#8'BtnPanel'#4'Left'#2#6
+#6'Height'#3#243#0#3'Top'#2'R'#5'Width'#3#199#0#7'Anchors'#11#5'akTop'#6'akL'
+'eft'#8'akBottom'#0#18'BorderSpacing.Left'#2#6#17'BorderSpacing.Top'#2#6#20
+'BorderSpacing.Bottom'#2#6#7'Caption'#6#15'OptionsGroupBox'#12'ClientHeight'
+#3#222#0#11'ClientWidth'#3#195#0#8'TabOrder'#2#2#8'OnResize'#7#21'OptionsGro'
+'upBoxResize'#0#9'TCheckBox'#23'PromptOnReplaceCheckBox'#18'AnchorSideTop.Si'
+'de'#7#9'asrBottom'#4'Left'#2#6#6'Height'#2#23#3'Top'#3#152#0#5'Width'#3#183
+#0#5'Align'#7#5'alTop'#17'BorderSpacing.Top'#2#6#20'BorderSpacing.Around'#2#6
+#7'Caption'#6#23'PromptOnReplaceCheckBox'#7'Checked'#9#14'ParentShowHint'#8#8
+'ShowHint'#9#5'State'#7#9'cbChecked'#8'TabOrder'#2#4#0#0#9'TCheckBox'#17'Mul'
+'tiLineCheckBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'
+#2#23#3'Top'#2'u'#5'Width'#3#183#0#5'Align'#7#5'alTop'#17'BorderSpacing.Top'
+#2#6#20'BorderSpacing.Around'#2#6#7'Caption'#6#17'MultiLineCheckBox'#14'Pare'
+'ntShowHint'#8#8'ShowHint'#9#8'TabOrder'#2#3#0#0#9'TCheckBox'#26'RegularExpr'
+'essionsCheckBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'
+#2#23#3'Top'#2'R'#5'Width'#3#183#0#5'Align'#7#5'alTop'#17'BorderSpacing.Top'
+#2#6#20'BorderSpacing.Around'#2#6#7'Caption'#6#26'RegularExpressionsCheckBox'
+#14'ParentShowHint'#8#8'ShowHint'#9#8'TabOrder'#2#2#0#0#9'TCheckBox'#22'Whol'
+'eWordsOnlyCheckBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#6#6'Hei'
+'ght'#2#23#3'Top'#2'/'#5'Width'#3#183#0#5'Align'#7#5'alTop'#17'BorderSpacing'
+'.Top'#2#6#20'BorderSpacing.Around'#2#6#7'Caption'#6#22'WholeWordsOnlyCheckB'
+'ox'#14'ParentShowHint'#8#8'ShowHint'#9#8'TabOrder'#2#1#0#0#9'TCheckBox'#21
+'CaseSensitiveCheckBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#2#6#6
+'Height'#2#23#3'Top'#2#12#5'Width'#3#183#0#5'Align'#7#5'alTop'#17'BorderSpac'
+'ing.Top'#2#6#20'BorderSpacing.Around'#2#6#7'Caption'#6#21'CaseSensitiveChec'
+'kBox'#14'ParentShowHint'#8#8'ShowHint'#9#8'TabOrder'#2#0#0#0#0#9'TGroupBox'
+#13'ScopeGroupBox'#22'AnchorSideLeft.Control'#7#15'OptionsGroupBox'#19'Ancho'
+'rSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#14'OriginGroupBo'
+'x'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#3#211#0#6'Height'#2'J'#3'T'
+'op'#3#162#0#5'Width'#3#199#0#20'BorderSpacing.Around'#2#6#7'Caption'#6#13'S'
+'copeGroupBox'#28'ChildSizing.LeftRightSpacing'#2#6#29'ChildSizing.EnlargeHo'
+'rizontal'#7#24'crsHomogenousChildResize'#27'ChildSizing.EnlargeVertical'#7
+#24'crsHomogenousSpaceResize'#28'ChildSizing.ShrinkHorizontal'#7#24'crsHomog'
+'enousSpaceResize'#26'ChildSizing.ShrinkVertical'#7#24'crsHomogenousSpaceRes'
+'ize'#18'ChildSizing.Layout'#7#29'cclLeftToRightThenTopToBottom'#27'ChildSiz'
,'ing.ControlsPerLine'#2#1#12'ClientHeight'#2'5'#11'ClientWidth'#3#195#0#8'Ta'
+'bOrder'#2#4#0#12'TRadioButton'#19'SelectedRadioButton'#4'Left'#2#5#6'Height'
+#2#23#3'Top'#2#3#5'Width'#3#184#0#7'Caption'#6#19'SelectedRadioButton'#8'Tab'
+'Order'#2#0#0#0#12'TRadioButton'#17'GlobalRadioButton'#4'Left'#2#5#6'Height'
+#2#23#3'Top'#2#29#5'Width'#3#184#0#7'Caption'#6#17'GlobalRadioButton'#7'Chec'
+'ked'#9#5'State'#7#9'cbChecked'#8'TabOrder'#2#1#0#0#0#9'TGroupBox'#17'Direct'
+'ionGroupBox'#22'AnchorSideLeft.Control'#7#15'OptionsGroupBox'#19'AnchorSide'
+'Left.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#13'ScopeGroupBox'#18
+'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#3#211#0#6'Height'#2'J'#3'Top'#3
+#242#0#5'Width'#3#199#0#20'BorderSpacing.Around'#2#6#7'Caption'#6#17'Directi'
+'onGroupBox'#28'ChildSizing.LeftRightSpacing'#2#6#29'ChildSizing.EnlargeHori'
+'zontal'#7#24'crsHomogenousChildResize'#27'ChildSizing.EnlargeVertical'#7#24
+#0#0#9'TCheckBox'#19'ReplaceWithCheckbox'#22'AnchorSideLeft.Control'#7#5'Own'
+'er'#21'AnchorSideTop.Control'#7#19'ReplaceTextComboBox'#18'AnchorSideTop.Si'
+'de'#7#9'asrCenter'#4'Left'#2#6#6'Height'#2#18#3'Top'#2'('#5'Width'#3#159#0
+#18'BorderSpacing.Left'#2#6#7'Caption'#6#19'ReplaceWithCheckbox'#8'OnChange'
+#7#25'ReplaceWithCheckboxChange'#8'TabOrder'#2#7#0#0#9'TComboBox'#18'TextToF'
+'indComboBox'#22'AnchorSideLeft.Control'#7#15'TextToFindLabel'#19'AnchorSide'
+'Left.Side'#7#9'asrBottom'#23'AnchorSideRight.Control'#7#5'Owner'#20'AnchorS'
+'ideRight.Side'#7#9'asrBottom'#4'Left'#2'{'#6'Height'#2#21#3'Top'#2#12#5'Wid'
+'th'#3'#'#1#7'Anchors'#11#5'akTop'#6'akLeft'#7'akRight'#0#12'AutoComplete'#9
+#16'AutoCompleteText'#11#12'cbactEnabled'#22'cbactEndOfLineComplete'#21'cbac'
+'tRetainPrefixCase'#20'cbactSearchAscending'#0#18'BorderSpacing.Left'#2#6#20
+'BorderSpacing.Around'#2#6#9'MaxLength'#2#0#9'OnKeyDown'#7#25'TextToFindComb'
+'oboxKeyDown'#8'TabOrder'#2#0#4'Text'#6#18'TextToFindComboBox'#0#0#9'TComboB'
+'ox'#19'ReplaceTextComboBox'#22'AnchorSideLeft.Control'#7#19'ReplaceWithChec'
+'kbox'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#18
+'TextToFindComboBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#23'AnchorSideRigh'
+'t.Control'#7#5'Owner'#20'AnchorSideRight.Side'#7#9'asrBottom'#4'Left'#3#177
+#0#6'Height'#2#21#3'Top'#2''''#5'Width'#3#237#0#7'Anchors'#11#5'akTop'#6'akL'
+'eft'#7'akRight'#0#12'AutoComplete'#9#16'AutoCompleteText'#11#12'cbactEnable'
+'d'#22'cbactEndOfLineComplete'#21'cbactRetainPrefixCase'#20'cbactSearchAscen'
+'ding'#0#18'BorderSpacing.Left'#2#6#20'BorderSpacing.Around'#2#6#9'MaxLength'
+#2#0#9'OnKeyDown'#7#25'TextToFindComboboxKeyDown'#8'TabOrder'#2#1#4'Text'#6
+#19'ReplaceTextComboBox'#0#0#9'TGroupBox'#15'OptionsGroupBox'#22'AnchorSideL'
+'eft.Control'#7#5'Owner'#21'AnchorSideTop.Control'#7#19'ReplaceTextComboBox'
+#18'AnchorSideTop.Side'#7#9'asrBottom'#24'AnchorSideBottom.Control'#7#8'BtnP'
+'anel'#4'Left'#2#6#6'Height'#3#3#1#3'Top'#2'B'#5'Width'#3#199#0#7'Anchors'#11
+#5'akTop'#6'akLeft'#8'akBottom'#0#18'BorderSpacing.Left'#2#6#17'BorderSpacin'
+'g.Top'#2#6#20'BorderSpacing.Bottom'#2#6#7'Caption'#6#15'OptionsGroupBox'#12
+'ClientHeight'#3#237#0#11'ClientWidth'#3#191#0#8'TabOrder'#2#2#8'OnResize'#7
+#21'OptionsGroupBoxResize'#0#9'TCheckBox'#23'PromptOnReplaceCheckBox'#18'Anc'
+'horSideTop.Side'#7#9'asrBottom'#4'Left'#2#6#6'Height'#2#18#3'Top'#3#132#0#5
+'Width'#3#179#0#5'Align'#7#5'alTop'#17'BorderSpacing.Top'#2#6#20'BorderSpaci'
+'ng.Around'#2#6#7'Caption'#6#23'PromptOnReplaceCheckBox'#7'Checked'#9#14'Par'
+'entShowHint'#8#8'ShowHint'#9#5'State'#7#9'cbChecked'#8'TabOrder'#2#4#0#0#9
+'TCheckBox'#17'MultiLineCheckBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Le'
+'ft'#2#6#6'Height'#2#18#3'Top'#2'f'#5'Width'#3#179#0#5'Align'#7#5'alTop'#17
+'BorderSpacing.Top'#2#6#20'BorderSpacing.Around'#2#6#7'Caption'#6#17'MultiLi'
+'neCheckBox'#14'ParentShowHint'#8#8'ShowHint'#9#8'TabOrder'#2#3#0#0#9'TCheck'
+'Box'#26'RegularExpressionsCheckBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#4
+'Left'#2#6#6'Height'#2#18#3'Top'#2'H'#5'Width'#3#179#0#5'Align'#7#5'alTop'#17
+'BorderSpacing.Top'#2#6#20'BorderSpacing.Around'#2#6#7'Caption'#6#26'Regular'
+'ExpressionsCheckBox'#14'ParentShowHint'#8#8'ShowHint'#9#8'TabOrder'#2#2#0#0
+#9'TCheckBox'#22'WholeWordsOnlyCheckBox'#18'AnchorSideTop.Side'#7#9'asrBotto'
+'m'#4'Left'#2#6#6'Height'#2#18#3'Top'#2'*'#5'Width'#3#179#0#5'Align'#7#5'alT'
+'op'#17'BorderSpacing.Top'#2#6#20'BorderSpacing.Around'#2#6#7'Caption'#6#22
+'WholeWordsOnlyCheckBox'#14'ParentShowHint'#8#8'ShowHint'#9#8'TabOrder'#2#1#0
+#0#9'TCheckBox'#21'CaseSensitiveCheckBox'#18'AnchorSideTop.Side'#7#9'asrBott'
+'om'#4'Left'#2#6#6'Height'#2#18#3'Top'#2#12#5'Width'#3#179#0#5'Align'#7#5'al'
+'Top'#17'BorderSpacing.Top'#2#6#20'BorderSpacing.Around'#2#6#7'Caption'#6#21
+'CaseSensitiveCheckBox'#14'ParentShowHint'#8#8'ShowHint'#9#8'TabOrder'#2#0#0
+#0#0#9'TGroupBox'#13'ScopeGroupBox'#22'AnchorSideLeft.Control'#7#15'OptionsG'
+'roupBox'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7
+#14'OriginGroupBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#3#211#0#6
,'Height'#2'J'#3'Top'#3#146#0#5'Width'#3#199#0#20'BorderSpacing.Around'#2#6#7
+'Caption'#6#13'ScopeGroupBox'#28'ChildSizing.LeftRightSpacing'#2#6#29'ChildS'
+'izing.EnlargeHorizontal'#7#24'crsHomogenousChildResize'#27'ChildSizing.Enla'
+'rgeVertical'#7#24'crsHomogenousSpaceResize'#28'ChildSizing.ShrinkHorizontal'
+#7#24'crsHomogenousSpaceResize'#26'ChildSizing.ShrinkVertical'#7#24'crsHomog'
+'enousSpaceResize'#18'ChildSizing.Layout'#7#29'cclLeftToRightThenTopToBottom'
+#27'ChildSizing.ControlsPerLine'#2#1#12'ClientHeight'#2'4'#11'ClientWidth'#3
+#191#0#8'TabOrder'#2#4#0#12'TRadioButton'#19'SelectedRadioButton'#4'Left'#2#6
+#6'Height'#2#18#3'Top'#2#6#5'Width'#3#179#0#7'Caption'#6#19'SelectedRadioBut'
+'ton'#8'TabOrder'#2#0#0#0#12'TRadioButton'#17'GlobalRadioButton'#4'Left'#2#6
+#6'Height'#2#18#3'Top'#2#30#5'Width'#3#179#0#7'Caption'#6#17'GlobalRadioButt'
+'on'#7'Checked'#9#5'State'#7#9'cbChecked'#8'TabOrder'#2#1#0#0#0#9'TGroupBox'
+#17'DirectionGroupBox'#22'AnchorSideLeft.Control'#7#15'OptionsGroupBox'#19'A'
+'nchorSideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#13'ScopeGrou'
+'pBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#3#211#0#6'Height'#2'J'#3
+'Top'#3#226#0#5'Width'#3#199#0#20'BorderSpacing.Around'#2#6#7'Caption'#6#17
+'DirectionGroupBox'#28'ChildSizing.LeftRightSpacing'#2#6#29'ChildSizing.Enla'
+'rgeHorizontal'#7#24'crsHomogenousChildResize'#27'ChildSizing.EnlargeVertica'
+'l'#7#24'crsHomogenousSpaceResize'#28'ChildSizing.ShrinkHorizontal'#7#24'crs'
+'HomogenousSpaceResize'#26'ChildSizing.ShrinkVertical'#7#24'crsHomogenousSpa'
+'ceResize'#18'ChildSizing.Layout'#7#29'cclLeftToRightThenTopToBottom'#27'Chi'
+'ldSizing.ControlsPerLine'#2#1#12'ClientHeight'#2'4'#11'ClientWidth'#3#191#0
+#8'TabOrder'#2#5#0#12'TRadioButton'#19'BackwardRadioButton'#4'Left'#2#6#6'He'
+'ight'#2#18#3'Top'#2#6#5'Width'#3#179#0#7'Caption'#6#19'BackwardRadioButton'
+#8'TabOrder'#2#0#0#0#12'TRadioButton'#18'ForwardRadioButton'#4'Left'#2#6#6'H'
+'eight'#2#18#3'Top'#2#30#5'Width'#3#179#0#7'Caption'#6#18'ForwardRadioButton'
+#7'Checked'#9#5'State'#7#9'cbChecked'#8'TabOrder'#2#1#0#0#0#9'TGroupBox'#14
+'OriginGroupBox'#22'AnchorSideLeft.Control'#7#15'OptionsGroupBox'#19'AnchorS'
+'ideLeft.Side'#7#9'asrBottom'#21'AnchorSideTop.Control'#7#19'ReplaceTextComb'
+'oBox'#18'AnchorSideTop.Side'#7#9'asrBottom'#4'Left'#3#211#0#6'Height'#2'J'#3
+'Top'#2'B'#5'Width'#3#199#0#20'BorderSpacing.Around'#2#6#7'Caption'#6#14'Ori'
+'ginGroupBox'#28'ChildSizing.LeftRightSpacing'#2#6#29'ChildSizing.EnlargeHor'
+'izontal'#7#24'crsHomogenousChildResize'#27'ChildSizing.EnlargeVertical'#7#24
+'crsHomogenousSpaceResize'#28'ChildSizing.ShrinkHorizontal'#7#24'crsHomogeno'
+'usSpaceResize'#26'ChildSizing.ShrinkVertical'#7#24'crsHomogenousSpaceResize'
+#18'ChildSizing.Layout'#7#29'cclLeftToRightThenTopToBottom'#27'ChildSizing.C'
+'ontrolsPerLine'#2#1#12'ClientHeight'#2'5'#11'ClientWidth'#3#195#0#8'TabOrde'
+'r'#2#5#0#12'TRadioButton'#19'BackwardRadioButton'#6'Height'#2#23#3'Top'#2#3
+#5'Width'#3#196#0#7'Caption'#6#19'BackwardRadioButton'#8'TabOrder'#2#0#0#0#12
+'TRadioButton'#18'ForwardRadioButton'#6'Height'#2#23#3'Top'#2#29#5'Width'#3
+#196#0#7'Caption'#6#18'ForwardRadioButton'#7'Checked'#9#5'State'#7#9'cbCheck'
+'ed'#8'TabOrder'#2#1#0#0#0#9'TGroupBox'#14'OriginGroupBox'#22'AnchorSideLeft'
+'.Control'#7#15'OptionsGroupBox'#19'AnchorSideLeft.Side'#7#9'asrBottom'#21'A'
+'nchorSideTop.Control'#7#19'ReplaceTextComboBox'#18'AnchorSideTop.Side'#7#9
+'asrBottom'#4'Left'#3#211#0#6'Height'#2'J'#3'Top'#2'R'#5'Width'#3#199#0#20'B'
+'orderSpacing.Around'#2#6#7'Caption'#6#14'OriginGroupBox'#28'ChildSizing.Lef'
+'tRightSpacing'#2#6#29'ChildSizing.EnlargeHorizontal'#7#24'crsHomogenousChil'
+'dResize'#27'ChildSizing.EnlargeVertical'#7#24'crsHomogenousSpaceResize'#28
+'ChildSizing.ShrinkHorizontal'#7#24'crsHomogenousSpaceResize'#26'ChildSizing'
+'.ShrinkVertical'#7#24'crsHomogenousSpaceResize'#18'ChildSizing.Layout'#7#29
+'cclLeftToRightThenTopToBottom'#27'ChildSizing.ControlsPerLine'#2#1#12'Clien'
+'tHeight'#2'5'#11'ClientWidth'#3#195#0#8'TabOrder'#2#3#0#12'TRadioButton'#21
+'FromCursorRadioButton'#6'Height'#2#23#3'Top'#2#3#5'Width'#3#213#0#8'AutoSiz'
+'e'#8#7'Caption'#6#21'FromCursorRadioButton'#7'Checked'#9#5'State'#7#9'cbChe'
+'cked'#8'TabOrder'#2#0#0#0#12'TRadioButton'#22'EntireScopeRadioButton'#6'Hei'
+'ght'#2#23#3'Top'#2#29#5'Width'#3#213#0#8'AutoSize'#8#7'Caption'#6#22'Entire'
+'ScopeRadioButton'#8'TabOrder'#2#1#0#0#0#6'TPanel'#8'BtnPanel'#6'Height'#2'*'
+#3'Top'#3'K'#1#5'Width'#3#164#1#5'Align'#7#8'alBottom'#8'AutoSize'#9#10'Beve'
+'lOuter'#7#6'bvNone'#12'ClientHeight'#2'*'#11'ClientWidth'#3#164#1#8'TabOrde'
+'r'#2#6#0#7'TBitBtn'#16'ReplaceAllButton'#21'AnchorSideBottom.Side'#7#9'asrB'
+'ottom'#4'Left'#3#216#0#6'Height'#2#30#3'Top'#2#6#5'Width'#2'.'#5'Align'#7#7
+'alRight'#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#4'&All'#4
+'Kind'#7#5'bkAll'#9'NumGlyphs'#2#0#7'OnClick'#7#21'ReplaceAllButtonClick'#8
+'TabOrder'#2#0#0#0#7'TBitBtn'#8'OKButton'#21'AnchorSideBottom.Side'#7#9'asrB'
+'ottom'#4'Left'#3#12#1#6'Height'#2#30#3'Top'#2#6#5'Width'#2'8'#5'Align'#7#7
+'alRight'#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#7'Caption'#6#3'&OK'#7'D'
+'efault'#9#4'Kind'#7#4'bkOK'#9'NumGlyphs'#2#0#7'OnClick'#7#13'OkButtonClick'
+#8'TabOrder'#2#1#0#0#7'TBitBtn'#12'CancelButton'#20'AnchorSideRight.Side'#7#9
+'asrBottom'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3'J'#1#6'Height'
+#2#30#3'Top'#2#6#5'Width'#2'T'#5'Align'#7#7'alRight'#8'AutoSize'#9#20'Border'
+'Spacing.Around'#2#6#6'Cancel'#9#7'Caption'#6#6'Cancel'#4'Kind'#7#8'bkCancel'
+#11'ModalResult'#2#2#9'NumGlyphs'#2#0#7'OnClick'#7#17'CancelButtonClick'#8'T'
+'abOrder'#2#2#0#0#0#0
+'ontrolsPerLine'#2#1#12'ClientHeight'#2'4'#11'ClientWidth'#3#191#0#8'TabOrde'
+'r'#2#3#0#12'TRadioButton'#21'FromCursorRadioButton'#4'Left'#2#6#6'Height'#2
+#18#3'Top'#2#6#5'Width'#3#179#0#8'AutoSize'#8#7'Caption'#6#21'FromCursorRadi'
+'oButton'#7'Checked'#9#5'State'#7#9'cbChecked'#8'TabOrder'#2#0#0#0#12'TRadio'
+'Button'#22'EntireScopeRadioButton'#4'Left'#2#6#6'Height'#2#18#3'Top'#2#30#5
+'Width'#3#179#0#8'AutoSize'#8#7'Caption'#6#22'EntireScopeRadioButton'#8'TabO'
+'rder'#2#1#0#0#0#6'TPanel'#8'BtnPanel'#6'Height'#2'*'#3'Top'#3'K'#1#5'Width'
+#3#164#1#5'Align'#7#8'alBottom'#8'AutoSize'#9#10'BevelOuter'#7#6'bvNone'#12
+'ClientHeight'#2'*'#11'ClientWidth'#3#164#1#8'TabOrder'#2#6#0#7'TBitBtn'#16
+'ReplaceAllButton'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3#221#0#6
+'Height'#2#30#3'Top'#2#6#5'Width'#2'5'#5'Align'#7#7'alRight'#8'AutoSize'#9#20
+'BorderSpacing.Around'#2#6#7'Caption'#6#4'&All'#4'Kind'#7#5'bkAll'#9'NumGlyp'
+'hs'#2#0#7'OnClick'#7#21'ReplaceAllButtonClick'#8'TabOrder'#2#0#0#0#7'TBitBt'
+'n'#8'OKButton'#21'AnchorSideBottom.Side'#7#9'asrBottom'#4'Left'#3#24#1#6'He'
+'ight'#2#30#3'Top'#2#6#5'Width'#2'7'#5'Align'#7#7'alRight'#8'AutoSize'#9#20
+'BorderSpacing.Around'#2#6#7'Caption'#6#3'&OK'#7'Default'#9#4'Kind'#7#4'bkOK'
+#9'NumGlyphs'#2#0#7'OnClick'#7#13'OkButtonClick'#8'TabOrder'#2#1#0#0#7'TBitB'
+'tn'#12'CancelButton'#20'AnchorSideRight.Side'#7#9'asrBottom'#21'AnchorSideB'
+'ottom.Side'#7#9'asrBottom'#4'Left'#3'U'#1#6'Height'#2#30#3'Top'#2#6#5'Width'
+#2'I'#5'Align'#7#7'alRight'#8'AutoSize'#9#20'BorderSpacing.Around'#2#6#6'Can'
+'cel'#9#7'Caption'#6#6'Cancel'#4'Kind'#7#8'bkCancel'#11'ModalResult'#2#2#9'N'
+'umGlyphs'#2#0#7'OnClick'#7#17'CancelButtonClick'#8'TabOrder'#2#2#0#0#0#0
]);

View File

@ -52,30 +52,31 @@ type
TLazFindReplaceDialog = class(TForm)
BackwardRadioButton: TRadioButton;
BtnPanel: TPanel;
ReplaceAllButton: TBitBtn;
CancelButton: TBitBtn;
CaseSensitiveCheckBox: TCheckBox;
DirectionGroupBox: TGroupBox;
EntireScopeRadioButton: TRadioButton;
ForwardRadioButton: TRadioButton;
FromCursorRadioButton: TRadioButton;
GlobalRadioButton: TRadioButton;
DirectionGroupBox: TGroupBox;
OriginGroupBox: TGroupBox;
ScopeGroupBox: TGroupBox;
OptionsGroupBox: TGroupBox;
MultiLineCheckBox: TCheckBox;
OKButton: TBitBtn;
OptionsGroupBox: TGroupBox;
OriginGroupBox: TGroupBox;
PromptOnReplaceCheckBox: TCheckBox;
RegularExpressionsCheckBox: TCheckBox;
SelectedRadioButton: TRadioButton;
TextToFindLabel: TLabel;
ReplaceWithLabel: TLabel;
TextToFindComboBox: TComboBox;
ReplaceAllButton: TBitBtn;
ReplaceTextComboBox: TComboBox;
CancelButton: TBitBtn;
ReplaceWithCheckbox: TCheckBox;
ScopeGroupBox: TGroupBox;
SelectedRadioButton: TRadioButton;
TextToFindComboBox: TComboBox;
TextToFindLabel: TLabel;
WholeWordsOnlyCheckBox: TCheckBox;
procedure FormChangeBounds(Sender: TObject);
procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
procedure OptionsGroupBoxResize(Sender: TObject);
procedure ReplaceWithCheckboxChange(Sender: TObject);
procedure TextToFindComboboxKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
procedure OkButtonClick(Sender: TObject);
@ -128,7 +129,7 @@ begin
TextToFindComboBox.Text:='';
TextToFindLabel.Caption:=dlgTextToFing;
ReplaceTextComboBox.Text:='';
ReplaceWithLabel.Caption:=dlgReplaceWith;
ReplaceWithCheckbox.Caption:=dlgReplaceWith;
OptionsGroupBox.Caption:=dlgFROpts;
@ -215,6 +216,20 @@ begin
EnableAlign;
end;
procedure TLazFindReplaceDialog.ReplaceWithCheckboxChange(Sender: TObject);
begin
ReplaceAllButton.Visible:=ReplaceWithCheckbox.Checked;
ReplaceTextComboBox.Enabled:=ReplaceAllButton.Visible;
PromptOnReplaceCheckBox.Enabled:=ReplaceAllButton.Visible;
if ReplaceAllButton.Visible then begin
Caption:=lisMenuReplace;
OkButton.Caption:=lisMenuReplace;
end else begin
Caption:=lisMenuFind;
OkButton.Caption:=lisMenuFind;
end;
end;
procedure TLazFindReplaceDialog.FormChangeBounds(Sender: TObject);
var
w: integer;
@ -322,8 +337,8 @@ begin
else ForwardRadioButton.Checked:=True;
ReplaceAllButton.Visible:=ssoReplace in NewOptions;
ReplaceWithCheckbox.Checked:=ssoReplace in NewOptions;
ReplaceTextComboBox.Enabled:=ReplaceAllButton.Visible;
ReplaceWithLabel.Enabled:=ReplaceAllButton.Visible;
PromptOnReplaceCheckBox.Enabled:=ReplaceAllButton.Visible;
if ssoReplace in NewOptions then begin

View File

@ -1071,8 +1071,8 @@ begin
ecPageRight: SetResult(VK_UNKNOWN,[],VK_UNKNOWN,[]);
ecPageTop: SetResult(VK_PRIOR, [ssAlt],VK_UNKNOWN,[]);
ecPageBottom: SetResult(VK_END, [ssAlt],VK_UNKNOWN,[]);
ecEditorTop: SetResult(VK_HOME,[],VK_UNKNOWN,[]);
ecEditorBottom: SetResult(VK_END,[],VK_UNKNOWN,[]);
ecEditorTop: SetResult(VK_HOME,[],VK_UP,[ssMeta]);
ecEditorBottom: SetResult(VK_END,[],VK_DOWN,[ssMeta]);
ecScrollUp: SetResult(VK_UP, [ssCtrl],VK_UNKNOWN,[]);
ecScrollDown: SetResult(VK_DOWN, [ssCtrl],VK_UNKNOWN,[]);
ecScrollLeft: SetResult(VK_UNKNOWN, [],VK_UNKNOWN,[]);
@ -2338,7 +2338,7 @@ begin
ecEditContextHelp);
AddDefault(C, 'Reporting a bug', lisMenuReportingBug, ecReportingBug);
// designer - without menu items in the IDE bar (at least no direct)
// designer - without menu items in the IDE bar (at least not directly)
C:=Categories[AddCategory('Designer',lisKeyCatDesigner,IDECmdScopeDesignerOnly)];
AddDefault(C, 'Copy selected Components to clipboard',
lisKMCopySelectedComponentsToClipboard, ecDesignerCopy);
@ -2591,11 +2591,17 @@ var
a:integer;
begin
Result:=nil;
//debugln(['TKeyCommandRelationList.Find START ',DbgSName(IDEWindowClass)]);
//if IDEWindowClass=nil then RaiseGDBException('');
if Key.Key1=VK_UNKNOWN then exit;
for a:=0 to FRelations.Count-1 do
with Relations[a] do begin
//if Command=ecDesignerSelectParent then
// debugln('TKeyCommandRelationList.Find A ',Category.Scope.Name,' ',dbgsName(IDEWindowClass),' ',dbgs(IDECmdScopeDesignerOnly.IDEWindowClassCount),' ',dbgsName(IDECmdScopeDesignerOnly.IDEWindowClasses[0]));
//debugln(['TKeyCommandRelationList.Find ',Name,' HasScope=',Category.Scope<>nil,' ',KeyAndShiftStateToEditorKeyString(ShortcutA),' ',KeyAndShiftStateToEditorKeyString(Key),' ',(Category.Scope<>nil) and (not Category.Scope.HasIDEWindowClass(IDEWindowClass))]);
//if (Category.Scope<>nil) and (Category.Scope.IDEWindowClassCount>0) then
// debugln(['TKeyCommandRelationList.Find ',DbgSName(Category.Scope.IDEWindowClasses[0]),' ',DbgSName(IDEWindowClass)]);
if (Category.Scope<>nil)
and (not Category.Scope.HasIDEWindowClass(IDEWindowClass)) then continue;
if ((ShortcutA.Key1=Key.Key1) and (ShortcutA.Shift1=Key.Shift1) and
@ -2889,6 +2895,20 @@ function TKeyCommandRelationList.TranslateKey(Key: word; Shift: TShiftState;
var
ARelation: TKeyCommandRelation;
begin
//debugln(['TKeyCommandRelationList.TranslateKey ',DbgSName(IDEWindowClass)]);
//if IDEWindowClass=nil then DumpStack;
Result:=ecNone;
case Key of
VK_UNDEFINED,VK_UNKNOWN,
VK_CONTROL,VK_LCONTROL,VK_RCONTROL,
VK_SHIFT,VK_LSHIFT,VK_RSHIFT,
VK_LBUTTON,VK_MBUTTON,VK_RBUTTON,
VK_LWIN,VK_RWIN:
begin
//debugln(['TKeyCommandRelationList.TranslateKey ignoring ',dbgs(Key)]);
exit;
end;
end;
if UseLastKey and (fLastKey.Key1<>VK_UNKNOWN) then begin
// the last key had no command
// => try a two key combination command
@ -2915,9 +2935,7 @@ begin
fLastKey.Key2 := VK_UNKNOWN;
fLastKey.Shift2 := [];
Result:=ARelation.Command
end
else
Result:=ecNone;
end;
end;
function TKeyCommandRelationList.IndexOf(ARelation: TKeyCommandRelation

View File

@ -3825,6 +3825,7 @@ resourcestring
+'a clean copy of the project/package, all files in the following '
+'directory will be deleted and all its content will be lost.%s%sDelete '
+'all files in %s%s%s?';
lisFileExtensionOfPrograms = 'File extension of programs';
implementation

View File

@ -5478,8 +5478,6 @@ begin
end;
if ([ofProjectLoading,ofLoadHiddenResource]*OpenFlags=[]) then
FormEditor1.ClearSelection;
// create JIT component
NewUnitName:=AnUnitInfo.UnitName;
@ -10082,6 +10080,8 @@ begin
true,true)<>mrOk
then begin
DoJumpToCompilerMessage(-1,true);
Result:=mrAbort;
exit;
end;
Result:=mrOk;

View File

@ -1158,8 +1158,7 @@ begin
// Fill in history items
LazFindReplaceDialog.TextToFindComboBox.Items.Assign(InputHistories.FindHistory);
if Replace then
LazFindReplaceDialog.ReplaceTextComboBox.Items.Assign(
LazFindReplaceDialog.ReplaceTextComboBox.Items.Assign(
InputHistories.ReplaceHistory);
with EditorComponent do begin
@ -1196,6 +1195,7 @@ begin
end;
//debugln('TSourceEditor.StartFindAndReplace B LazFindReplaceDialog.FindText="',dbgstr(LazFindReplaceDialog.FindText),'"');
Replace:=ssoReplace in LazFindReplaceDialog.Options;
if Replace then
InputHistories.AddToReplaceHistory(LazFindReplaceDialog.ReplaceText);
InputHistories.AddToFindHistory(LazFindReplaceDialog.FindText);