object frmSearchReplace: TfrmSearchReplace Left = 0 Height = 389 Top = 0 Width = 542 BorderIcons = [] Caption = 'Search and replace text' ClientHeight = 389 ClientWidth = 542 Color = clBtnFace Constraints.MinHeight = 150 Constraints.MinWidth = 250 DesignTimePPI = 120 Font.Color = clWindowText OnClose = FormClose OnCreate = FormCreate OnShow = FormShow Position = poOwnerFormCenter object lblSearch: TLabel AnchorSideTop.Control = comboSearchIn AnchorSideTop.Side = asrBottom Left = 10 Height = 20 Top = 40 Width = 78 BorderSpacing.Around = 6 Caption = '&Text to find:' FocusControl = comboSearch end object lblReplaceHint: TLabel AnchorSideTop.Control = comboReplace AnchorSideTop.Side = asrBottom Left = 112 Height = 20 Top = 108 Width = 324 Anchors = [akTop, akLeft, akRight] BorderSpacing.Around = 6 Caption = 'Replacement can have \n for new lines and \t for tabs' Enabled = False end object lblSearchIn: TLabel AnchorSideTop.Control = Owner Left = 10 Height = 20 Top = 6 Width = 63 BorderSpacing.Around = 6 Caption = 'Search in:' end object btnCancel: TButton Left = 408 Height = 31 Top = 348 Width = 125 Anchors = [akRight, akBottom] Cancel = True Caption = 'Cancel' ModalResult = 2 TabOrder = 12 end object btnReplaceAll: TButton Left = 276 Height = 31 Top = 348 Width = 125 Anchors = [akRight, akBottom] Caption = 'Replace &all' ModalResult = 12 TabOrder = 11 OnClick = DoSearchReplace end object chkReplace: TCheckBox AnchorSideTop.Control = comboSearch AnchorSideTop.Side = asrBottom Left = 10 Height = 24 Top = 74 Width = 77 BorderSpacing.Around = 6 Caption = '&Replace:' TabOrder = 3 OnClick = chkReplaceClick end object comboSearch: TComboBox AnchorSideTop.Control = comboSearchIn AnchorSideTop.Side = asrBottom Left = 112 Height = 28 Top = 40 Width = 381 Anchors = [akTop, akLeft, akRight] BorderSpacing.Around = 6 ItemHeight = 20 TabOrder = 1 Text = 'comboSearch' TextHint = 'Enter text to find ...' OnExit = comboSearchReplaceExit end object comboReplace: TComboBox AnchorSideTop.Control = comboSearch AnchorSideTop.Side = asrBottom Left = 112 Height = 28 Top = 74 Width = 381 Anchors = [akTop, akLeft, akRight] BorderSpacing.Around = 6 Enabled = False ItemHeight = 20 TabOrder = 4 Text = 'comboReplace' TextHint = 'Enter replacement pattern ...' OnExit = comboSearchReplaceExit end object grpOptions: TGroupBox AnchorSideTop.Control = lblReplaceHint AnchorSideTop.Side = asrBottom Left = 10 Height = 86 Top = 134 Width = 522 Anchors = [akTop, akLeft, akRight] BorderSpacing.Around = 6 Caption = '&Options' ClientHeight = 61 ClientWidth = 518 ParentBackground = False TabOrder = 6 object chkCaseSensitive: TCheckBox Left = 15 Height = 24 Top = 0 Width = 112 Caption = 'Case sensitive' TabOrder = 0 end object chkWholeWords: TCheckBox Left = 15 Height = 24 Top = 29 Width = 108 Caption = 'Whole words' TabOrder = 1 end object chkRegularExpression: TCheckBox Left = 230 Height = 24 Top = 0 Width = 146 Caption = 'Regular expression' ParentShowHint = False ShowHint = True TabOrder = 2 OnClick = ValidateControls end object chkPromptOnReplace: TCheckBox Left = 230 Height = 24 Top = 29 Width = 144 Caption = 'Prompt on replace' TabOrder = 3 end end object grpDirection: TRadioGroup AnchorSideTop.Control = grpOptions AnchorSideTop.Side = asrBottom Left = 10 Height = 114 Top = 226 Width = 150 Anchors = [akTop, akLeft, akBottom] AutoFill = True Caption = '&Direction' ChildSizing.LeftRightSpacing = 6 ChildSizing.EnlargeHorizontal = crsHomogenousChildResize ChildSizing.EnlargeVertical = crsHomogenousChildResize ChildSizing.ShrinkHorizontal = crsScaleChilds ChildSizing.ShrinkVertical = crsScaleChilds ChildSizing.Layout = cclLeftToRightThenTopToBottom ChildSizing.ControlsPerLine = 1 ClientHeight = 89 ClientWidth = 146 ItemIndex = 0 Items.Strings = ( '&Forward' '&Backward' ) ParentBackground = False TabOrder = 7 end object grpOrigin: TRadioGroup AnchorSideTop.Control = grpOptions AnchorSideTop.Side = asrBottom Left = 168 Height = 114 Top = 226 Width = 150 Anchors = [akTop, akLeft, akBottom] AutoFill = True Caption = 'Or&igin' ChildSizing.LeftRightSpacing = 6 ChildSizing.EnlargeHorizontal = crsHomogenousChildResize ChildSizing.EnlargeVertical = crsHomogenousChildResize ChildSizing.ShrinkHorizontal = crsScaleChilds ChildSizing.ShrinkVertical = crsScaleChilds ChildSizing.Layout = cclLeftToRightThenTopToBottom ChildSizing.ControlsPerLine = 1 ClientHeight = 89 ClientWidth = 146 ItemIndex = 1 Items.Strings = ( 'From cursor' 'Entire scope' ) ParentBackground = False TabOrder = 8 end object grpScope: TRadioGroup AnchorSideTop.Control = grpOptions AnchorSideTop.Side = asrBottom Left = 325 Height = 114 Top = 226 Width = 207 Anchors = [akTop, akLeft, akRight, akBottom] AutoFill = True Caption = '&Scope' ChildSizing.LeftRightSpacing = 6 ChildSizing.EnlargeHorizontal = crsHomogenousChildResize ChildSizing.EnlargeVertical = crsHomogenousChildResize ChildSizing.ShrinkHorizontal = crsScaleChilds ChildSizing.ShrinkVertical = crsScaleChilds ChildSizing.Layout = cclLeftToRightThenTopToBottom ChildSizing.ControlsPerLine = 1 ClientHeight = 89 ClientWidth = 203 ItemIndex = 0 Items.Strings = ( 'Global' 'Selection' ) ParentBackground = False TabOrder = 9 end object btnOK: TButton Left = 143 Height = 31 Top = 348 Width = 125 Anchors = [akRight, akBottom] Caption = 'OK' Default = True ModalResult = 1 TabOrder = 10 OnClick = DoSearchReplace end object comboSearchIn: TComboBox AnchorSideTop.Control = Owner Left = 112 Height = 28 Top = 6 Width = 420 Anchors = [akTop, akLeft, akRight] BorderSpacing.Around = 6 ItemHeight = 20 Style = csDropDownList TabOrder = 0 end object btnSearchHints: TButton AnchorSideTop.Control = comboSearchIn AnchorSideTop.Side = asrBottom Left = 501 Height = 31 Top = 40 Width = 31 Anchors = [akTop, akRight] BorderSpacing.Around = 6 Caption = '⏷' TabOrder = 2 OnClick = btnWithDropDownClick end object btnReplaceHints: TButton AnchorSideTop.Control = comboSearch AnchorSideTop.Side = asrBottom Left = 501 Height = 31 Top = 74 Width = 31 Anchors = [akTop, akRight] BorderSpacing.Around = 6 Caption = '⏷' Enabled = False TabOrder = 5 OnClick = btnWithDropDownClick end object popupSearchHints: TPopupMenu Left = 410 Top = 30 end object popupReplaceHints: TPopupMenu Left = 410 Top = 90 end end