Files
HeidiSQL/source/searchreplace.lfm
2025-03-26 15:44:16 +01:00

307 lines
7.5 KiB
Plaintext

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