dexed/src/ce_shortcutseditor.lfm

104 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 btnClear: TSpeedButton
Left = 2
Height = 22
Hint = 'clear shortcut'
Top = 2
Width = 23
Align = alLeft
BorderSpacing.Around = 2
Flat = True
OnClick = btnClearClick
end
object propedit: TTIPropertyGrid
Left = 52
Height = 26
Top = 0
Width = 368
Align = alClient
CheckboxForBoolean = False
DefaultValueFont.Color = clWindowText
Filter = [tkInteger, tkChar, tkEnumeration, tkFloat, tkSet, tkMethod, tkSString, tkLString, tkAString, tkWString, tkVariant, tkArray, tkRecord, tkInterface, tkClass, tkObject, tkWChar, tkBool, tkInt64, tkQWord, tkDynArray, tkInterfaceRaw, tkProcVar, tkUString, tkUChar, tkHelper, tkFile, tkClassRef, tkPointer]
Indent = 10
NameFont.Color = clWindowText
OnModified = propeditModified
ValueFont.Color = clMaroon
end
object btnEdit: TSpeedButton
Left = 27
Height = 22
Hint = 'edit selected shortcut'
Top = 2
Width = 23
Align = alLeft
BorderSpacing.Around = 2
Flat = True
OnClick = btnEditClick
end
end
end
end