dexed/src/ce_shortcutseditor.lfm

116 lines
2.7 KiB
Plaintext

object CEShortcutEditor: TCEShortcutEditor
Left = 0
Height = 463
Top = 0
Width = 424
ClientHeight = 463
ClientWidth = 424
TabOrder = 0
DesignLeft = 678
DesignTop = 216
object Panel1: TPanel
Left = 0
Height = 463
Top = 0
Width = 424
Align = alClient
BevelOuter = bvNone
ClientHeight = 463
ClientWidth = 424
TabOrder = 0
object fltItems: TTreeFilterEdit
Left = 2
Height = 24
Top = 2
Width = 420
OnFilterItem = fltItemsFilterItem
ButtonWidth = 28
NumGlyphs = 1
Align = alTop
BorderSpacing.Around = 2
AutoSize = False
MaxLength = 0
TabOrder = 0
FilteredTreeview = tree
end
object tree: TTreeView
Left = 2
Height = 403
Top = 30
Width = 420
Align = alClient
AutoExpand = True
BorderSpacing.Top = 2
BorderSpacing.Around = 2
DefaultItemHeight = 16
HideSelection = False
ReadOnly = True
ScrollBars = ssAutoBoth
SortType = stText
TabOrder = 1
OnSelectionChanged = treeSelectionChanged
Options = [tvoAutoExpand, tvoAutoItemHeight, tvoKeepCollapsedNodes, tvoReadOnly, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoToolTips, tvoThemedDraw]
end
object Panel2: TPanel
Left = 2
Height = 26
Top = 435
Width = 420
Align = alBottom
BorderSpacing.Around = 2
BevelOuter = bvNone
ClientHeight = 26
ClientWidth = 420
TabOrder = 2
object schrtText: TStaticText
Left = 0
Height = 22
Top = 2
Width = 247
Align = alClient
Alignment = taCenter
BorderSpacing.Top = 2
BorderSpacing.Bottom = 2
BorderStyle = sbsSunken
TabOrder = 0
end
object shortcutCatcher: TEdit
Left = 299
Height = 22
Hint = 'type a key combination while active'
Top = 2
Width = 120
Align = alRight
BorderSpacing.Top = 1
BorderSpacing.Bottom = 1
BorderSpacing.Around = 1
Enabled = False
OnExit = shortcutCatcherExit
OnKeyDown = LabeledEdit1KeyDown
OnMouseLeave = shortcutCatcherMouseLeave
TabOrder = 1
end
object btnActivate: TSpeedButton
Left = 274
Height = 22
Hint = 'enable shortcut capture'
Top = 2
Width = 23
Align = alRight
BorderSpacing.Around = 2
OnClick = btnActivateClick
end
object btnClear: TSpeedButton
Left = 249
Height = 22
Hint = 'clear shortcut'
Top = 2
Width = 23
Align = alRight
BorderSpacing.Around = 2
OnClick = btnClearClick
end
end
end
end