mirror of
https://github.com/doublecmd/doublecmd.git
synced 2026-06-21 09:58:13 +00:00
1037 lines
28 KiB
Text
1037 lines
28 KiB
Text
object frmMultiRename: TfrmMultiRename
|
|
Left = 492
|
|
Height = 624
|
|
Top = 132
|
|
Width = 788
|
|
ActiveControl = cbName
|
|
Caption = 'Multi-Rename Tool'
|
|
ClientHeight = 597
|
|
ClientWidth = 788
|
|
KeyPreview = True
|
|
Menu = mmMainMenu
|
|
OnClose = FormClose
|
|
OnCloseQuery = FormCloseQuery
|
|
OnCreate = FormCreate
|
|
OnShow = FormShow
|
|
Position = poScreenCenter
|
|
SessionProperties = 'Height;Left;Top;Width;WindowState;pnlOptionsLeft.Width'
|
|
ShowHint = True
|
|
ShowInTaskBar = stAlways
|
|
LCLVersion = '2.0.12.0'
|
|
object StringGrid: TStringGrid
|
|
Left = 6
|
|
Height = 261
|
|
Top = 6
|
|
Width = 776
|
|
Align = alClient
|
|
AutoFillColumns = True
|
|
BorderSpacing.Left = 6
|
|
BorderSpacing.Top = 6
|
|
BorderSpacing.Right = 6
|
|
ColCount = 3
|
|
Columns = <
|
|
item
|
|
SizePriority = 0
|
|
Title.Caption = 'Old File Name'
|
|
Width = 248
|
|
end
|
|
item
|
|
SizePriority = 0
|
|
Title.Caption = 'New File Name'
|
|
Width = 249
|
|
end
|
|
item
|
|
Title.Caption = 'File Path'
|
|
Width = 277
|
|
end>
|
|
ExtendedSelect = False
|
|
FixedCols = 0
|
|
MouseWheelOption = mwGrid
|
|
Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing, goRowSelect, goSmoothScroll]
|
|
ParentFont = False
|
|
RowCount = 1
|
|
TabOrder = 2
|
|
TitleStyle = tsNative
|
|
OnKeyDown = StringGridKeyDown
|
|
OnMouseDown = StringGridMouseDown
|
|
OnMouseUp = StringGridMouseUp
|
|
OnResize = StringGridTopLeftChanged
|
|
OnSelection = StringGridSelection
|
|
OnTopLeftChanged = StringGridTopLeftChanged
|
|
ColWidths = (
|
|
248
|
|
249
|
|
277
|
|
)
|
|
end
|
|
object pnlOptions: TPanel
|
|
Left = 6
|
|
Height = 275
|
|
Top = 273
|
|
Width = 776
|
|
Align = alBottom
|
|
AutoSize = True
|
|
BorderSpacing.Around = 6
|
|
BevelOuter = bvNone
|
|
ClientHeight = 275
|
|
ClientWidth = 776
|
|
ParentFont = False
|
|
TabOrder = 0
|
|
object pnlOptionsLeft: TPanel
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 0
|
|
Height = 275
|
|
Top = 0
|
|
Width = 250
|
|
Align = alLeft
|
|
BevelOuter = bvNone
|
|
ClientHeight = 275
|
|
ClientWidth = 250
|
|
ParentFont = False
|
|
TabOrder = 0
|
|
object gbMaska: TGroupBox
|
|
AnchorSideLeft.Control = pnlOptionsLeft
|
|
AnchorSideTop.Control = pnlOptionsLeft
|
|
AnchorSideRight.Control = pnlOptionsLeft
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 0
|
|
Height = 210
|
|
Top = 0
|
|
Width = 250
|
|
Anchors = [akTop, akLeft, akRight]
|
|
AutoSize = True
|
|
Caption = 'Mask'
|
|
ChildSizing.LeftRightSpacing = 4
|
|
ChildSizing.HorizontalSpacing = 2
|
|
ChildSizing.VerticalSpacing = 2
|
|
ClientHeight = 190
|
|
ClientWidth = 248
|
|
ParentFont = False
|
|
TabOrder = 0
|
|
object lbName: TLabel
|
|
AnchorSideLeft.Control = gbMaska
|
|
AnchorSideTop.Control = gbMaska
|
|
AnchorSideBottom.Control = cbName
|
|
Left = 4
|
|
Height = 17
|
|
Top = 0
|
|
Width = 61
|
|
Caption = 'File &Name'
|
|
FocusControl = cbName
|
|
ParentColor = False
|
|
ParentFont = False
|
|
end
|
|
object lbExt: TLabel
|
|
AnchorSideLeft.Control = gbMaska
|
|
AnchorSideTop.Control = cbNameMaskStyle
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 4
|
|
Height = 17
|
|
Top = 95
|
|
Width = 60
|
|
Caption = '&Extension'
|
|
FocusControl = cbExt
|
|
ParentColor = False
|
|
ParentFont = False
|
|
end
|
|
object cbNameMaskStyle: TComboBox
|
|
AnchorSideLeft.Control = btnAnyNameMask
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = cbName
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = gbMaska
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 29
|
|
Height = 35
|
|
Top = 56
|
|
Width = 215
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Bottom = 4
|
|
ItemHeight = 0
|
|
OnChange = cbNameStyleChange
|
|
ParentFont = False
|
|
Style = csDropDownList
|
|
TabOrder = 2
|
|
end
|
|
object cmbExtensionStyle: TComboBox
|
|
AnchorSideLeft.Control = btnAnyExtMask
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = cbExt
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = gbMaska
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 29
|
|
Height = 35
|
|
Top = 151
|
|
Width = 215
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Bottom = 4
|
|
ItemHeight = 0
|
|
OnChange = cbNameStyleChange
|
|
ParentFont = False
|
|
Style = csDropDownList
|
|
TabOrder = 5
|
|
end
|
|
object btnAnyNameMask: TKASButton
|
|
AnchorSideLeft.Control = gbMaska
|
|
AnchorSideTop.Control = cbNameMaskStyle
|
|
AnchorSideBottom.Control = cbNameMaskStyle
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 4
|
|
Height = 35
|
|
Top = 56
|
|
Width = 23
|
|
Anchors = [akTop, akLeft, akBottom]
|
|
TabOrder = 1
|
|
TabStop = True
|
|
end
|
|
object btnAnyExtMask: TKASButton
|
|
AnchorSideLeft.Control = gbMaska
|
|
AnchorSideTop.Control = cmbExtensionStyle
|
|
AnchorSideBottom.Control = cmbExtensionStyle
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 4
|
|
Height = 35
|
|
Top = 151
|
|
Width = 23
|
|
Anchors = [akTop, akLeft, akBottom]
|
|
TabOrder = 4
|
|
TabStop = True
|
|
end
|
|
object cbName: TComboBox
|
|
AnchorSideLeft.Control = gbMaska
|
|
AnchorSideTop.Control = lbName
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = gbMaska
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 4
|
|
Height = 35
|
|
Top = 19
|
|
Width = 240
|
|
Anchors = [akTop, akLeft, akRight]
|
|
AutoSelect = False
|
|
ItemHeight = 0
|
|
OnChange = cbNameStyleChange
|
|
ParentFont = False
|
|
TabOrder = 0
|
|
end
|
|
object cbExt: TComboBox
|
|
AnchorSideLeft.Control = gbMaska
|
|
AnchorSideTop.Control = lbExt
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = gbMaska
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 4
|
|
Height = 35
|
|
Top = 114
|
|
Width = 240
|
|
Anchors = [akTop, akLeft, akRight]
|
|
AutoSelect = False
|
|
ItemHeight = 0
|
|
OnChange = cbNameStyleChange
|
|
ParentFont = False
|
|
TabOrder = 3
|
|
end
|
|
end
|
|
object gbPresets: TGroupBox
|
|
AnchorSideLeft.Control = pnlOptionsLeft
|
|
AnchorSideTop.Control = gbMaska
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = pnlOptionsLeft
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 0
|
|
Height = 59
|
|
Top = 216
|
|
Width = 250
|
|
Anchors = [akTop, akLeft, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Top = 6
|
|
Caption = 'Presets'
|
|
ChildSizing.LeftRightSpacing = 4
|
|
ChildSizing.TopBottomSpacing = 2
|
|
ChildSizing.HorizontalSpacing = 2
|
|
ClientHeight = 39
|
|
ClientWidth = 248
|
|
ParentColor = False
|
|
ParentFont = False
|
|
TabOrder = 1
|
|
object cbPresets: TComboBox
|
|
AnchorSideLeft.Control = gbPresets
|
|
AnchorSideTop.Control = gbPresets
|
|
AnchorSideRight.Control = btnPresets
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 4
|
|
Height = 35
|
|
Top = 2
|
|
Width = 222
|
|
Anchors = [akTop, akLeft, akRight]
|
|
DropDownCount = 15
|
|
ItemHeight = 0
|
|
OnChange = cbPresetsChange
|
|
OnCloseUp = cbPresetsCloseUp
|
|
ParentFont = False
|
|
Style = csDropDownList
|
|
TabOrder = 1
|
|
end
|
|
object btnPresets: TBitBtn
|
|
AnchorSideTop.Control = cbPresets
|
|
AnchorSideRight.Control = gbPresets
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = cbPresets
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 228
|
|
Height = 35
|
|
Top = 2
|
|
Width = 16
|
|
Anchors = [akTop, akRight, akBottom]
|
|
AutoSize = True
|
|
OnClick = actExecute
|
|
ParentBidiMode = False
|
|
ParentFont = False
|
|
Spacing = 0
|
|
TabOrder = 0
|
|
end
|
|
end
|
|
end
|
|
object spltMainSplitter: TSplitter
|
|
Left = 250
|
|
Height = 275
|
|
Top = 0
|
|
Width = 5
|
|
ResizeStyle = rsLine
|
|
end
|
|
object pnlOptionsRight: TKASToolPanel
|
|
Left = 255
|
|
Height = 275
|
|
Top = 0
|
|
Width = 521
|
|
Align = alClient
|
|
AutoSize = True
|
|
ChildSizing.HorizontalSpacing = 2
|
|
ChildSizing.VerticalSpacing = 2
|
|
EdgeBorders = [ebBottom]
|
|
TabOrder = 1
|
|
object gbFindReplace: TGroupBox
|
|
AnchorSideLeft.Control = pnlOptionsRight
|
|
AnchorSideTop.Control = pnlOptionsRight
|
|
AnchorSideRight.Control = gbCounter
|
|
Left = 0
|
|
Height = 184
|
|
Top = 0
|
|
Width = 318
|
|
Anchors = [akTop, akLeft, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Right = 4
|
|
Caption = 'Find && Replace'
|
|
ChildSizing.LeftRightSpacing = 4
|
|
ChildSizing.HorizontalSpacing = 2
|
|
ChildSizing.VerticalSpacing = 2
|
|
ClientHeight = 164
|
|
ClientWidth = 316
|
|
ParentFont = False
|
|
TabOrder = 0
|
|
object lbFind: TLabel
|
|
AnchorSideLeft.Control = gbFindReplace
|
|
AnchorSideTop.Control = gbFindReplace
|
|
Left = 4
|
|
Height = 17
|
|
Top = 0
|
|
Width = 38
|
|
Caption = '&Find...'
|
|
FocusControl = edFind
|
|
ParentColor = False
|
|
ParentFont = False
|
|
end
|
|
object lbReplace: TLabel
|
|
AnchorSideLeft.Control = gbFindReplace
|
|
AnchorSideTop.Control = edFind
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 4
|
|
Height = 17
|
|
Top = 58
|
|
Width = 60
|
|
BorderSpacing.Top = 4
|
|
Caption = 'Re&place...'
|
|
FocusControl = edReplace
|
|
ParentColor = False
|
|
ParentFont = False
|
|
end
|
|
object cbRegExp: TCheckBox
|
|
AnchorSideLeft.Control = gbFindReplace
|
|
AnchorSideTop.Control = edReplace
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 4
|
|
Height = 23
|
|
Top = 116
|
|
Width = 149
|
|
BorderSpacing.Top = 4
|
|
Caption = 'Regular e&xpressions'
|
|
OnChange = cbRegExpChange
|
|
ParentFont = False
|
|
TabOrder = 2
|
|
end
|
|
object cbUseSubs: TCheckBox
|
|
AnchorSideLeft.Control = gbFindReplace
|
|
AnchorSideTop.Control = cbRegExp
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 4
|
|
Height = 23
|
|
Top = 141
|
|
Width = 126
|
|
BorderSpacing.Top = 2
|
|
Caption = '&Use substitution'
|
|
Enabled = False
|
|
OnChange = cbNameStyleChange
|
|
ParentFont = False
|
|
TabOrder = 3
|
|
end
|
|
object edFind: TEdit
|
|
AnchorSideLeft.Control = gbFindReplace
|
|
AnchorSideTop.Control = lbFind
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = gbFindReplace
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 4
|
|
Height = 35
|
|
Top = 19
|
|
Width = 308
|
|
Anchors = [akTop, akLeft, akRight]
|
|
AutoSelect = False
|
|
OnChange = edFindChange
|
|
ParentFont = False
|
|
TabOrder = 0
|
|
end
|
|
object edReplace: TEdit
|
|
AnchorSideLeft.Control = gbFindReplace
|
|
AnchorSideTop.Control = lbReplace
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = gbFindReplace
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 4
|
|
Height = 35
|
|
Top = 77
|
|
Width = 308
|
|
Anchors = [akTop, akLeft, akRight]
|
|
AutoSelect = False
|
|
OnChange = edReplaceChange
|
|
ParentFont = False
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
object gbCounter: TGroupBox
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = pnlOptionsRight
|
|
AnchorSideRight.Control = pnlOptionsRight
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = gbFindReplace
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 322
|
|
Height = 184
|
|
Top = 0
|
|
Width = 199
|
|
Anchors = [akTop, akRight, akBottom]
|
|
AutoSize = True
|
|
Caption = 'Counter'
|
|
ChildSizing.LeftRightSpacing = 4
|
|
ChildSizing.TopBottomSpacing = 2
|
|
ChildSizing.HorizontalSpacing = 4
|
|
ChildSizing.VerticalSpacing = 6
|
|
ChildSizing.EnlargeHorizontal = crsScaleChilds
|
|
ChildSizing.ShrinkHorizontal = crsScaleChilds
|
|
ChildSizing.ShrinkVertical = crsScaleChilds
|
|
ChildSizing.Layout = cclLeftToRightThenTopToBottom
|
|
ChildSizing.ControlsPerLine = 2
|
|
ClientHeight = 164
|
|
ClientWidth = 197
|
|
ParentFont = False
|
|
TabOrder = 1
|
|
object lbStNb: TLabel
|
|
Left = 4
|
|
Height = 17
|
|
Top = 11
|
|
Width = 85
|
|
BorderSpacing.CellAlignVertical = ccaCenter
|
|
Caption = 'S&tart Number'
|
|
FocusControl = edPoc
|
|
ParentColor = False
|
|
ParentFont = False
|
|
end
|
|
object edPoc: TEdit
|
|
Left = 93
|
|
Height = 35
|
|
Top = 2
|
|
Width = 100
|
|
AutoSelect = False
|
|
MaxLength = 10
|
|
OnChange = edPocChange
|
|
ParentFont = False
|
|
TabOrder = 0
|
|
Text = '1'
|
|
end
|
|
object lbInterval: TLabel
|
|
Left = 4
|
|
Height = 17
|
|
Top = 52
|
|
Width = 85
|
|
BorderSpacing.CellAlignVertical = ccaCenter
|
|
Caption = '&Interval'
|
|
FocusControl = edInterval
|
|
ParentColor = False
|
|
ParentFont = False
|
|
end
|
|
object edInterval: TEdit
|
|
Left = 93
|
|
Height = 35
|
|
Top = 43
|
|
Width = 100
|
|
AutoSelect = False
|
|
MaxLength = 10
|
|
OnChange = edIntervalChange
|
|
ParentFont = False
|
|
TabOrder = 1
|
|
Text = '1'
|
|
end
|
|
object lbWidth: TLabel
|
|
Left = 4
|
|
Height = 17
|
|
Top = 91
|
|
Width = 85
|
|
BorderSpacing.CellAlignVertical = ccaCenter
|
|
Caption = '&Width'
|
|
FocusControl = cmbxWidth
|
|
ParentColor = False
|
|
ParentFont = False
|
|
end
|
|
object cmbxWidth: TComboBox
|
|
Left = 93
|
|
Height = 31
|
|
Top = 84
|
|
Width = 100
|
|
BorderSpacing.Bottom = 4
|
|
ItemHeight = 0
|
|
ItemIndex = 0
|
|
Items.Strings = (
|
|
'01'
|
|
'02'
|
|
'03'
|
|
'04'
|
|
'05'
|
|
'06'
|
|
'07'
|
|
'08'
|
|
'09'
|
|
'10'
|
|
)
|
|
OnChange = cbNameStyleChange
|
|
ParentFont = False
|
|
Style = csDropDownList
|
|
TabOrder = 2
|
|
Text = '01'
|
|
end
|
|
end
|
|
object cbLog: TCheckBox
|
|
AnchorSideLeft.Control = pnlOptionsRight
|
|
AnchorSideTop.Control = cbLogAppend
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 10
|
|
Height = 23
|
|
Top = 190
|
|
Width = 87
|
|
BorderSpacing.Left = 10
|
|
BorderSpacing.Top = 2
|
|
Caption = '&Log result'
|
|
OnClick = cbLogClick
|
|
ParentFont = False
|
|
TabOrder = 2
|
|
end
|
|
object btnRelativeRenameLogFile: TSpeedButton
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = fneRenameLogFileFilename
|
|
AnchorSideRight.Control = btnViewRenameLogFile
|
|
AnchorSideBottom.Control = fneRenameLogFileFilename
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 473
|
|
Height = 35
|
|
Top = 215
|
|
Width = 23
|
|
Anchors = [akTop, akRight, akBottom]
|
|
ParentFont = False
|
|
end
|
|
object btnViewRenameLogFile: TSpeedButton
|
|
AnchorSideTop.Control = fneRenameLogFileFilename
|
|
AnchorSideRight.Control = pnlOptionsRight
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = fneRenameLogFileFilename
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 498
|
|
Height = 35
|
|
Top = 215
|
|
Width = 23
|
|
Anchors = [akTop, akRight, akBottom]
|
|
ParentFont = False
|
|
end
|
|
object fneRenameLogFileFilename: TFileNameEdit
|
|
AnchorSideLeft.Control = pnlOptionsRight
|
|
AnchorSideTop.Control = cbLog
|
|
AnchorSideTop.Side = asrBottom
|
|
AnchorSideRight.Control = btnRelativeRenameLogFile
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 10
|
|
Height = 35
|
|
Top = 215
|
|
Width = 461
|
|
DialogTitle = 'Select target log filename'
|
|
DialogOptions = []
|
|
FilterIndex = 0
|
|
HideDirectories = False
|
|
ButtonWidth = 23
|
|
NumGlyphs = 1
|
|
Anchors = [akTop, akLeft, akRight]
|
|
BorderSpacing.Left = 10
|
|
MaxLength = 0
|
|
ParentFont = False
|
|
TabOrder = 4
|
|
OnChange = cbNameStyleChange
|
|
end
|
|
object cbLogAppend: TCheckBox
|
|
AnchorSideLeft.Control = cbLog
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = gbFindReplace
|
|
AnchorSideTop.Side = asrBottom
|
|
Left = 107
|
|
Height = 23
|
|
Top = 190
|
|
Width = 75
|
|
BorderSpacing.Left = 10
|
|
BorderSpacing.Top = 6
|
|
Caption = 'Append'
|
|
OnClick = cbLogClick
|
|
ParentFont = False
|
|
TabOrder = 3
|
|
end
|
|
end
|
|
end
|
|
object pnlButtons: TPanel
|
|
Left = 0
|
|
Height = 43
|
|
Top = 554
|
|
Width = 788
|
|
Align = alBottom
|
|
AutoSize = True
|
|
BevelOuter = bvNone
|
|
ChildSizing.LeftRightSpacing = 4
|
|
ChildSizing.TopBottomSpacing = 4
|
|
ClientHeight = 43
|
|
ClientWidth = 788
|
|
TabOrder = 1
|
|
object btnClose: TBitBtn
|
|
AnchorSideTop.Control = pnlButtons
|
|
AnchorSideRight.Control = pnlButtons
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 704
|
|
Height = 35
|
|
Top = 4
|
|
Width = 80
|
|
Action = actClose
|
|
Anchors = [akTop, akRight]
|
|
AutoSize = True
|
|
Constraints.MinWidth = 80
|
|
ParentFont = False
|
|
TabOrder = 4
|
|
end
|
|
object btnRestore: TBitBtn
|
|
AnchorSideTop.Control = btnClose
|
|
AnchorSideTop.Side = asrCenter
|
|
AnchorSideRight.Control = btnClose
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 598
|
|
Height = 35
|
|
Top = 4
|
|
Width = 100
|
|
Action = actResetAll
|
|
Anchors = [akTop, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Right = 6
|
|
Constraints.MinWidth = 100
|
|
ParentFont = False
|
|
TabOrder = 3
|
|
end
|
|
object btnRename: TBitBtn
|
|
AnchorSideTop.Control = btnClose
|
|
AnchorSideTop.Side = asrCenter
|
|
AnchorSideRight.Control = btnRestore
|
|
Left = 525
|
|
Height = 35
|
|
Top = 4
|
|
Width = 67
|
|
Action = actRename
|
|
Anchors = [akTop, akRight]
|
|
AutoSize = True
|
|
BorderSpacing.Right = 6
|
|
Default = True
|
|
ParentFont = False
|
|
TabOrder = 2
|
|
end
|
|
object btnEditor: TBitBtn
|
|
AnchorSideTop.Control = btnRename
|
|
AnchorSideTop.Side = asrCenter
|
|
AnchorSideRight.Side = asrBottom
|
|
Left = 4
|
|
Height = 35
|
|
Top = 4
|
|
Width = 120
|
|
Action = actInvokeEditor
|
|
AutoSize = True
|
|
Constraints.MinWidth = 120
|
|
ParentFont = False
|
|
TabOrder = 0
|
|
end
|
|
object btnConfig: TBitBtn
|
|
AnchorSideLeft.Side = asrBottom
|
|
AnchorSideTop.Control = btnRename
|
|
AnchorSideTop.Side = asrCenter
|
|
Left = 130
|
|
Height = 35
|
|
Top = 4
|
|
Width = 120
|
|
Action = actConfig
|
|
AutoSize = True
|
|
BorderSpacing.Left = 6
|
|
Constraints.MinWidth = 120
|
|
ParentFont = False
|
|
TabOrder = 1
|
|
end
|
|
end
|
|
object pmEditDirect: TPopupMenu
|
|
Images = dmComData.ilEditorImages
|
|
Left = 504
|
|
Top = 160
|
|
object mnuLoadFromFile: TMenuItem
|
|
Action = actLoadNamesFromFile
|
|
end
|
|
object mnuEditNames: TMenuItem
|
|
Action = actEditNames
|
|
end
|
|
object mnuEditNewNames: TMenuItem
|
|
Action = actEditNewNames
|
|
end
|
|
end
|
|
object mmMainMenu: TMainMenu
|
|
Images = dmComData.ilEditorImages
|
|
Left = 96
|
|
Top = 40
|
|
object miActions: TMenuItem
|
|
Caption = 'Actions'
|
|
object miResetAll: TMenuItem
|
|
Action = actResetAll
|
|
end
|
|
object miEditor: TMenuItem
|
|
Caption = 'Editor'
|
|
object miLoadNamesFromFile: TMenuItem
|
|
Action = actLoadNamesFromFile
|
|
end
|
|
object miEditNames: TMenuItem
|
|
Action = actEditNames
|
|
end
|
|
object miEditNewNames: TMenuItem
|
|
Action = actEditNewNames
|
|
end
|
|
end
|
|
object miSeparator1: TMenuItem
|
|
Caption = '-'
|
|
end
|
|
object miConfiguration: TMenuItem
|
|
Action = actConfig
|
|
end
|
|
object miSeparator2: TMenuItem
|
|
Caption = '-'
|
|
end
|
|
object miRename: TMenuItem
|
|
Action = actRename
|
|
end
|
|
object miClose: TMenuItem
|
|
Action = actClose
|
|
end
|
|
end
|
|
end
|
|
object actList: TActionList
|
|
Images = dmComData.ilEditorImages
|
|
Left = 360
|
|
Top = 96
|
|
object actAnyNameMask: TAction
|
|
Tag = 63
|
|
Category = 'Masks'
|
|
Caption = 'Filename'
|
|
ImageIndex = 20
|
|
OnExecute = actExecute
|
|
end
|
|
object actNameNameMask: TAction
|
|
Tag = 1
|
|
Category = 'Masks'
|
|
Caption = 'Filename'
|
|
ImageIndex = 20
|
|
OnExecute = actExecute
|
|
end
|
|
object actExtNameMask: TAction
|
|
Tag = 2
|
|
Category = 'Masks'
|
|
Caption = 'Extension'
|
|
ImageIndex = 21
|
|
OnExecute = actExecute
|
|
end
|
|
object actCtrNameMask: TAction
|
|
Tag = 4
|
|
Category = 'Masks'
|
|
Caption = 'Counter'
|
|
ImageIndex = 22
|
|
OnExecute = actExecute
|
|
end
|
|
object actDateNameMask: TAction
|
|
Tag = 8
|
|
Category = 'Masks'
|
|
Caption = 'Date'
|
|
ImageIndex = 23
|
|
OnExecute = actExecute
|
|
end
|
|
object actTimeNameMask: TAction
|
|
Tag = 16
|
|
Category = 'Masks'
|
|
Caption = 'Time'
|
|
ImageIndex = 24
|
|
OnExecute = actExecute
|
|
end
|
|
object actPlgnNameMask: TAction
|
|
Tag = 32
|
|
Category = 'Masks'
|
|
Caption = 'Plugins'
|
|
ImageIndex = 25
|
|
OnExecute = actExecute
|
|
end
|
|
object actResetAll: TAction
|
|
Category = 'Generic'
|
|
Caption = 'Reset &All'
|
|
ImageIndex = 17
|
|
OnExecute = actExecute
|
|
end
|
|
object actClearNameMask: TAction
|
|
Category = 'Masks'
|
|
Caption = 'Clear'
|
|
ImageIndex = 29
|
|
OnExecute = actExecute
|
|
end
|
|
object actAnyExtMask: TAction
|
|
Category = 'Masks'
|
|
Caption = 'Extension'
|
|
ImageIndex = 21
|
|
OnExecute = actExecute
|
|
end
|
|
object actNameExtMask: TAction
|
|
Category = 'Masks'
|
|
Caption = 'Filename'
|
|
ImageIndex = 20
|
|
OnExecute = actExecute
|
|
end
|
|
object actExtExtMask: TAction
|
|
Category = 'Masks'
|
|
Caption = 'Extension'
|
|
ImageIndex = 21
|
|
OnExecute = actExecute
|
|
end
|
|
object actCtrExtMask: TAction
|
|
Category = 'Masks'
|
|
Caption = 'Counter'
|
|
ImageIndex = 22
|
|
OnExecute = actExecute
|
|
end
|
|
object actDateExtMask: TAction
|
|
Category = 'Masks'
|
|
Caption = 'Date'
|
|
ImageIndex = 23
|
|
OnExecute = actExecute
|
|
end
|
|
object actTimeExtMask: TAction
|
|
Category = 'Masks'
|
|
Caption = 'Time'
|
|
ImageIndex = 24
|
|
OnExecute = actExecute
|
|
end
|
|
object actPlgnExtMask: TAction
|
|
Category = 'Masks'
|
|
Caption = 'Plugins'
|
|
ImageIndex = 25
|
|
OnExecute = actExecute
|
|
end
|
|
object actClearExtMask: TAction
|
|
Category = 'Masks'
|
|
Caption = 'Clear'
|
|
ImageIndex = 29
|
|
OnExecute = actExecute
|
|
end
|
|
object actInvokeEditor: TAction
|
|
Category = 'Generic'
|
|
Caption = 'Edit&or'
|
|
ImageIndex = 19
|
|
OnExecute = actExecute
|
|
end
|
|
object actViewRenameLogFile: TAction
|
|
Category = 'Log'
|
|
Caption = 'View Rename Log File'
|
|
ImageIndex = 26
|
|
OnExecute = actExecute
|
|
end
|
|
object actInvokeRelativePath: TAction
|
|
Category = 'Log'
|
|
Caption = 'Invoke Relative Path Menu'
|
|
ImageIndex = 27
|
|
OnExecute = actInvokeRelativePathExecute
|
|
end
|
|
object actLoadNamesFromFile: TAction
|
|
Category = 'Generic'
|
|
Caption = 'Load Names from File...'
|
|
OnExecute = actExecute
|
|
end
|
|
object actEditNames: TAction
|
|
Category = 'Generic'
|
|
Caption = 'Edit Names...'
|
|
OnExecute = actExecute
|
|
end
|
|
object actEditNewNames: TAction
|
|
Category = 'Generic'
|
|
Caption = 'Edit Current New Names...'
|
|
OnExecute = actExecute
|
|
end
|
|
object actShowPresetsMenu: TAction
|
|
Category = 'Presets'
|
|
Caption = 'Show Preset Menu'
|
|
ImageIndex = 30
|
|
OnExecute = actExecute
|
|
end
|
|
object actDropDownPresetList: TAction
|
|
Category = 'Presets'
|
|
Caption = 'Drop Down Presets List'
|
|
ImageIndex = 33
|
|
OnExecute = actExecute
|
|
end
|
|
object actLoadLastPreset: TAction
|
|
Category = 'Presets'
|
|
Caption = 'Load Last Preset'
|
|
OnExecute = actExecute
|
|
end
|
|
object actLoadPreset: TAction
|
|
Category = 'Presets'
|
|
Caption = 'Load Preset by Name or Index'
|
|
OnExecute = actExecute
|
|
end
|
|
object actLoadPreset1: TAction
|
|
Category = 'Presets'
|
|
Caption = 'Load Preset 1'
|
|
OnExecute = actExecute
|
|
end
|
|
object actLoadPreset2: TAction
|
|
Category = 'Presets'
|
|
Caption = 'Load Preset 2'
|
|
OnExecute = actExecute
|
|
end
|
|
object actLoadPreset3: TAction
|
|
Category = 'Presets'
|
|
Caption = 'Load Preset 3'
|
|
OnExecute = actExecute
|
|
end
|
|
object actLoadPreset4: TAction
|
|
Category = 'Presets'
|
|
Caption = 'Load Preset 4'
|
|
OnExecute = actExecute
|
|
end
|
|
object actLoadPreset5: TAction
|
|
Category = 'Presets'
|
|
Caption = 'Load Preset 5'
|
|
OnExecute = actExecute
|
|
end
|
|
object actLoadPreset6: TAction
|
|
Category = 'Presets'
|
|
Caption = 'Load Preset 6'
|
|
OnExecute = actExecute
|
|
end
|
|
object actLoadPreset7: TAction
|
|
Category = 'Presets'
|
|
Caption = 'Load Preset 7'
|
|
OnExecute = actExecute
|
|
end
|
|
object actLoadPreset8: TAction
|
|
Category = 'Presets'
|
|
Caption = 'Load Preset 8'
|
|
OnExecute = actExecute
|
|
end
|
|
object actLoadPreset9: TAction
|
|
Category = 'Presets'
|
|
Caption = 'Load Preset 9'
|
|
OnExecute = actExecute
|
|
end
|
|
object actSavePreset: TAction
|
|
Category = 'Presets'
|
|
Caption = 'Save'
|
|
ImageIndex = 31
|
|
OnExecute = actExecute
|
|
end
|
|
object actSavePresetAs: TAction
|
|
Category = 'Presets'
|
|
Caption = 'Save As...'
|
|
OnExecute = actExecute
|
|
end
|
|
object actRenamePreset: TAction
|
|
Category = 'Presets'
|
|
Caption = 'Rename'
|
|
OnExecute = actExecute
|
|
end
|
|
object actDeletePreset: TAction
|
|
Category = 'Presets'
|
|
Caption = 'Delete'
|
|
ImageIndex = 32
|
|
OnExecute = actExecute
|
|
end
|
|
object actSortPresets: TAction
|
|
Category = 'Presets'
|
|
Caption = 'Sort'
|
|
OnExecute = actExecute
|
|
end
|
|
object actConfig: TAction
|
|
Category = 'Generic'
|
|
Caption = 'Confi&guration'
|
|
ImageIndex = 18
|
|
OnExecute = actExecute
|
|
end
|
|
object actRename: TAction
|
|
Category = 'Generic'
|
|
Caption = '&Rename'
|
|
ImageIndex = 28
|
|
OnExecute = actExecute
|
|
end
|
|
object actClose: TAction
|
|
Category = 'Generic'
|
|
Caption = '&Close'
|
|
ImageIndex = 12
|
|
OnExecute = actExecute
|
|
end
|
|
end
|
|
object pmDynamicMasks: TPopupMenu
|
|
Images = dmComData.ilEditorImages
|
|
Left = 96
|
|
Top = 152
|
|
end
|
|
object pmPresets: TPopupMenu
|
|
Images = dmComData.ilEditorImages
|
|
Left = 120
|
|
Top = 376
|
|
end
|
|
object pmFloatingMainMaskMenu: TPopupMenu
|
|
Images = dmComData.ilEditorImages
|
|
Left = 96
|
|
Top = 96
|
|
end
|
|
object pmPathToBeRelativeToHelper: TPopupMenu
|
|
Left = 648
|
|
Top = 160
|
|
end
|
|
end
|