677 lines
16 KiB
Plaintext
677 lines
16 KiB
Plaintext
object dxBarCustomizationForm: TdxBarCustomizationForm
|
|
Left = 707
|
|
Top = 171
|
|
BorderIcons = [biSystemMenu]
|
|
Caption = 'Customize'
|
|
ClientHeight = 310
|
|
ClientWidth = 366
|
|
Color = clBtnFace
|
|
OldCreateOrder = True
|
|
Position = poScreenCenter
|
|
PixelsPerInch = 96
|
|
TextHeight = 13
|
|
AutoScroll = False
|
|
object Panel1: TPanel
|
|
Left = 0
|
|
Top = 274
|
|
Width = 366
|
|
Height = 36
|
|
Align = alBottom
|
|
BevelOuter = bvNone
|
|
TabOrder = 1
|
|
object BClose: TButton
|
|
Left = 285
|
|
Top = 8
|
|
Width = 75
|
|
Height = 23
|
|
Cancel = True
|
|
Caption = 'Close'
|
|
Default = True
|
|
ModalResult = 1
|
|
TabOrder = 1
|
|
OnClick = BCloseClick
|
|
end
|
|
object BHelp: TBitBtn
|
|
Left = 6
|
|
Top = 8
|
|
Width = 24
|
|
Height = 23
|
|
TabOrder = 0
|
|
OnClick = BHelpClick
|
|
Style = bsNew
|
|
end
|
|
end
|
|
object PageControl: TPageControl
|
|
Left = 6
|
|
Top = 8
|
|
Width = 354
|
|
Height = 266
|
|
ActivePage = tsToolbars
|
|
Align = alClient
|
|
TabOrder = 0
|
|
object tsToolbars: TTabSheet
|
|
Caption = ' Toolbars '
|
|
object LabelToobars: TLabel
|
|
Left = 4
|
|
Top = 4
|
|
Width = 44
|
|
Height = 13
|
|
Caption = 'Toolb&ars:'
|
|
end
|
|
object BBarDelete: TButton
|
|
Left = 239
|
|
Top = 79
|
|
Width = 104
|
|
Height = 22
|
|
Action = aDeleteToolBar
|
|
TabOrder = 3
|
|
end
|
|
object BBarNew: TButton
|
|
Left = 239
|
|
Top = 21
|
|
Width = 104
|
|
Height = 22
|
|
Action = aNewToolBar
|
|
TabOrder = 1
|
|
end
|
|
object BBarRename: TButton
|
|
Left = 239
|
|
Top = 50
|
|
Width = 104
|
|
Height = 22
|
|
Action = aRenameToolBar
|
|
TabOrder = 2
|
|
end
|
|
object lbBarsList: TListBox
|
|
Left = 4
|
|
Top = 20
|
|
Width = 227
|
|
Height = 213
|
|
Style = lbOwnerDrawFixed
|
|
Anchors = [akLeft, akTop, akBottom]
|
|
ItemHeight = 13
|
|
TabOrder = 0
|
|
end
|
|
object BBarReset: TButton
|
|
Left = 239
|
|
Top = 108
|
|
Width = 104
|
|
Height = 22
|
|
Action = aResetToolBar
|
|
TabOrder = 4
|
|
end
|
|
end
|
|
object tsItems: TTabSheet
|
|
Caption = ' Commands '
|
|
object Panel6: TPanel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 346
|
|
Height = 25
|
|
Align = alTop
|
|
BevelOuter = bvNone
|
|
TabOrder = 0
|
|
object LabelCategories: TLabel
|
|
Left = 6
|
|
Top = 8
|
|
Width = 53
|
|
Height = 13
|
|
Caption = 'Cate&gories:'
|
|
FocusControl = lbCategories
|
|
end
|
|
object LabelCommands: TLabel
|
|
Left = 148
|
|
Top = 8
|
|
Width = 55
|
|
Height = 13
|
|
Caption = 'Comman&ds:'
|
|
end
|
|
object CategoriesPopupButtonPlace: TSpeedButton
|
|
Left = 65
|
|
Top = 6
|
|
Width = 75
|
|
Height = 17
|
|
end
|
|
object CommandsPopupButtonPlace: TSpeedButton
|
|
Left = 207
|
|
Top = 6
|
|
Width = 134
|
|
Height = 17
|
|
end
|
|
end
|
|
object Panel7: TPanel
|
|
Left = 5
|
|
Top = 25
|
|
Width = 336
|
|
Height = 213
|
|
Align = alClient
|
|
BevelOuter = bvNone
|
|
Caption = 'Panel7'
|
|
TabOrder = 1
|
|
object lbCategories: TListBox
|
|
Left = 0
|
|
Top = 0
|
|
Width = 135
|
|
Height = 147
|
|
Align = alLeft
|
|
ItemHeight = 13
|
|
TabOrder = 0
|
|
end
|
|
object lbItems: TListBox
|
|
Left = 142
|
|
Top = 0
|
|
Width = 194
|
|
Height = 147
|
|
Style = lbOwnerDrawFixed
|
|
Align = alRight
|
|
Color = clBtnFace
|
|
ItemHeight = 22
|
|
TabOrder = 1
|
|
OnDrawItem = lbItemsDrawItem
|
|
end
|
|
object Panel9: TPanel
|
|
Left = 0
|
|
Top = 147
|
|
Width = 336
|
|
Height = 66
|
|
Align = alBottom
|
|
BevelOuter = bvNone
|
|
TabOrder = 2
|
|
object DescriptionLabel: TLabel
|
|
Left = 0
|
|
Top = 20
|
|
Width = 335
|
|
Height = 40
|
|
AutoSize = False
|
|
WordWrap = True
|
|
end
|
|
object Bevel1: TBevel
|
|
Left = 0
|
|
Top = 10
|
|
Width = 337
|
|
Height = 5
|
|
Shape = bsTopLine
|
|
end
|
|
object LabelDescription: TLabel
|
|
Left = 0
|
|
Top = 4
|
|
Width = 59
|
|
Height = 13
|
|
Caption = 'Description '
|
|
end
|
|
end
|
|
end
|
|
object Panel5: TPanel
|
|
Left = 0
|
|
Top = 25
|
|
Width = 5
|
|
Height = 213
|
|
Align = alLeft
|
|
BevelOuter = bvNone
|
|
TabOrder = 2
|
|
end
|
|
object Panel8: TPanel
|
|
Left = 341
|
|
Top = 25
|
|
Width = 5
|
|
Height = 213
|
|
Align = alRight
|
|
BevelOuter = bvNone
|
|
TabOrder = 3
|
|
end
|
|
end
|
|
object tsOptions: TTabSheet
|
|
Caption = ' Options '
|
|
object StandardOptionsPanel: TPanel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 346
|
|
Height = 238
|
|
Align = alClient
|
|
BevelOuter = bvNone
|
|
TabOrder = 0
|
|
object LabelMenuAnimations: TLabel
|
|
Left = 24
|
|
Top = 152
|
|
Width = 83
|
|
Height = 13
|
|
Caption = '&Menu animations:'
|
|
FocusControl = ComboBoxMenuAnimations
|
|
end
|
|
object ComboBoxMenuAnimations: TComboBox
|
|
Left = 134
|
|
Top = 148
|
|
Width = 93
|
|
Height = 21
|
|
Style = csDropDownList
|
|
ItemHeight = 13
|
|
TabOrder = 3
|
|
OnClick = ComboBoxMenuAnimationsClick
|
|
Items.Strings = (
|
|
'(None)'
|
|
'Random'
|
|
'Unfold'
|
|
'Slide')
|
|
end
|
|
object CBHint1: TCheckBox
|
|
Left = 24
|
|
Top = 63
|
|
Width = 301
|
|
Height = 17
|
|
Caption = 'Show Tool&Tips on toolbars'
|
|
TabOrder = 1
|
|
OnClick = CBHint1Click
|
|
end
|
|
object CBHint2: TCheckBox
|
|
Left = 24
|
|
Top = 85
|
|
Width = 301
|
|
Height = 17
|
|
Caption = 'Show s&hortcut keys in ToolTips'
|
|
TabOrder = 2
|
|
OnClick = CBHint2Click
|
|
end
|
|
object CBLargeIcons: TCheckBox
|
|
Left = 24
|
|
Top = 38
|
|
Width = 301
|
|
Height = 17
|
|
Caption = '&Large icons'
|
|
TabOrder = 0
|
|
OnClick = CBLargeIconsClick
|
|
end
|
|
end
|
|
object EnhancedOptionsPanel: TPanel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 346
|
|
Height = 238
|
|
Align = alClient
|
|
BevelOuter = bvNone
|
|
TabOrder = 1
|
|
object Label1: TLabel
|
|
Left = 20
|
|
Top = 200
|
|
Width = 83
|
|
Height = 13
|
|
Caption = '&Menu animations:'
|
|
FocusControl = ComboBoxMenuAnimationsEx
|
|
end
|
|
object Bevel2: TBevel
|
|
Left = 12
|
|
Top = 122
|
|
Width = 317
|
|
Height = 9
|
|
Shape = bsTopLine
|
|
end
|
|
object Label2: TLabel
|
|
Left = 12
|
|
Top = 116
|
|
Width = 32
|
|
Height = 13
|
|
Caption = 'Other '
|
|
end
|
|
object Bevel3: TBevel
|
|
Left = 12
|
|
Top = 18
|
|
Width = 317
|
|
Height = 7
|
|
Shape = bsTopLine
|
|
end
|
|
object Label3: TLabel
|
|
Left = 12
|
|
Top = 12
|
|
Width = 166
|
|
Height = 13
|
|
Caption = 'Personalized Menus and Toolbars '
|
|
end
|
|
object ComboBoxMenuAnimationsEx: TComboBox
|
|
Left = 132
|
|
Top = 196
|
|
Width = 93
|
|
Height = 21
|
|
Style = csDropDownList
|
|
ItemHeight = 13
|
|
TabOrder = 6
|
|
OnClick = ComboBoxMenuAnimationsClick
|
|
Items.Strings = (
|
|
'(None)'
|
|
'Random'
|
|
'Unfold'
|
|
'Slide')
|
|
end
|
|
object CBHint1Ex: TCheckBox
|
|
Left = 20
|
|
Top = 152
|
|
Width = 309
|
|
Height = 17
|
|
Caption = 'Show Tool&Tips on toolbars'
|
|
TabOrder = 4
|
|
OnClick = CBHint1ExClick
|
|
end
|
|
object CBHint2Ex: TCheckBox
|
|
Left = 36
|
|
Top = 172
|
|
Width = 293
|
|
Height = 17
|
|
Caption = 'Show s&hortcut keys in ToolTips'
|
|
TabOrder = 5
|
|
OnClick = CBHint2Click
|
|
end
|
|
object CBLargeIconsEx: TCheckBox
|
|
Left = 20
|
|
Top = 132
|
|
Width = 309
|
|
Height = 17
|
|
Caption = '&Large icons'
|
|
TabOrder = 3
|
|
OnClick = CBLargeIconsClick
|
|
end
|
|
object CBMenusShowRecentItemsFirst: TCheckBox
|
|
Left = 20
|
|
Top = 32
|
|
Width = 309
|
|
Height = 17
|
|
Caption = 'Me&nus show recently used commands first'
|
|
TabOrder = 0
|
|
OnClick = CBMenusShowRecentItemsFirstClick
|
|
end
|
|
object CBShowFullMenusAfterDelay: TCheckBox
|
|
Left = 36
|
|
Top = 52
|
|
Width = 293
|
|
Height = 17
|
|
Caption = 'Show f&ull menus after a short delay'
|
|
TabOrder = 1
|
|
OnClick = CBShowFullMenusAfterDelayClick
|
|
end
|
|
object BResetUsageData: TButton
|
|
Left = 20
|
|
Top = 76
|
|
Width = 119
|
|
Height = 22
|
|
Caption = '&Reset my usage data'
|
|
TabOrder = 2
|
|
OnClick = BResetUsageDataClick
|
|
end
|
|
end
|
|
end
|
|
object tsCommands: TTabSheet
|
|
Caption = ' All commands '
|
|
object LAllCommands: TListBox
|
|
Left = 6
|
|
Top = 8
|
|
Width = 333
|
|
Height = 200
|
|
Style = lbOwnerDrawFixed
|
|
Anchors = [akLeft, akTop, akBottom]
|
|
ItemHeight = 16
|
|
MultiSelect = True
|
|
TabOrder = 0
|
|
OnClick = LAllCommandsClick
|
|
OnDrawItem = LAllCommandsDrawItem
|
|
OnKeyDown = LAllCommandsKeyDown
|
|
end
|
|
object CBShowCommandsWithShortCut: TCheckBox
|
|
Left = 6
|
|
Top = 216
|
|
Width = 333
|
|
Height = 17
|
|
Anchors = [akLeft, akBottom]
|
|
Caption = 'Show commands that may have a shortcut'
|
|
Checked = True
|
|
State = cbChecked
|
|
TabOrder = 1
|
|
OnClick = CBShowCommandsWithShortCutClick
|
|
end
|
|
end
|
|
object tsGroups: TTabSheet
|
|
Caption = 'Groups'
|
|
object Bevel4: TBevel
|
|
Left = 171
|
|
Top = 0
|
|
Width = 4
|
|
Height = 238
|
|
Align = alLeft
|
|
Shape = bsSpacer
|
|
end
|
|
object gpGroupItems: TGroupBox
|
|
Left = 175
|
|
Top = 0
|
|
Width = 171
|
|
Height = 238
|
|
Align = alClient
|
|
Caption = ' Items '
|
|
TabOrder = 0
|
|
object lbGroupItems: TListBox
|
|
Left = 2
|
|
Top = 44
|
|
Width = 167
|
|
Height = 192
|
|
Style = lbOwnerDrawVariable
|
|
Align = alClient
|
|
BorderStyle = bsNone
|
|
ItemHeight = 13
|
|
MultiSelect = True
|
|
TabOrder = 0
|
|
OnClick = lbGroupItemsClick
|
|
OnDrawItem = lbGroupItemsDrawItem
|
|
OnKeyDown = lbGroupItemsKeyDown
|
|
OnMeasureItem = lbGroupsMeasureItem
|
|
end
|
|
object tbGroupItems: TToolBar
|
|
Left = 2
|
|
Top = 15
|
|
Width = 167
|
|
Height = 29
|
|
Caption = 'tbGroupItems'
|
|
EdgeBorders = [ebBottom]
|
|
EdgeOuter = esNone
|
|
Flat = True
|
|
Images = imgGroups
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 1
|
|
object btnAddGroupItem: TToolButton
|
|
Left = 0
|
|
Top = 0
|
|
Action = aAddGroupItem
|
|
end
|
|
object btnDeleteGroupItem: TToolButton
|
|
Left = 23
|
|
Top = 0
|
|
Action = aDeleteGroupItem
|
|
end
|
|
object ToolButton8: TToolButton
|
|
Left = 46
|
|
Top = 0
|
|
Width = 8
|
|
Caption = 'ToolButton8'
|
|
ImageIndex = 2
|
|
Style = tbsSeparator
|
|
end
|
|
object btnMoveUpGroupItem: TToolButton
|
|
Left = 54
|
|
Top = 0
|
|
Action = aMoveUpGroupItem
|
|
end
|
|
object btnMoveDownGroupItem: TToolButton
|
|
Left = 77
|
|
Top = 0
|
|
Action = aMoveDownGroupItem
|
|
end
|
|
end
|
|
end
|
|
object gbGroups: TGroupBox
|
|
Left = 0
|
|
Top = 0
|
|
Width = 171
|
|
Height = 238
|
|
Align = alLeft
|
|
Caption = ' Groups '
|
|
TabOrder = 1
|
|
object lbGroups: TListBox
|
|
Left = 2
|
|
Top = 44
|
|
Width = 167
|
|
Height = 192
|
|
Style = lbOwnerDrawVariable
|
|
Align = alClient
|
|
BorderStyle = bsNone
|
|
ItemHeight = 13
|
|
MultiSelect = True
|
|
TabOrder = 0
|
|
OnClick = lbGroupsClick
|
|
OnDrawItem = lbGroupsDrawItem
|
|
OnKeyDown = lbGroupsKeyDown
|
|
OnMeasureItem = lbGroupsMeasureItem
|
|
end
|
|
object tbGroups: TToolBar
|
|
Left = 2
|
|
Top = 15
|
|
Width = 167
|
|
Height = 29
|
|
Caption = 'tbGroups'
|
|
EdgeBorders = [ebBottom]
|
|
EdgeOuter = esNone
|
|
Flat = True
|
|
Images = imgGroups
|
|
ParentShowHint = False
|
|
ShowHint = True
|
|
TabOrder = 1
|
|
object btnAddGroup: TToolButton
|
|
Left = 0
|
|
Top = 0
|
|
Action = aAddGroup
|
|
end
|
|
object btnDeleteGroup: TToolButton
|
|
Left = 23
|
|
Top = 0
|
|
Action = aDeleteGroup
|
|
end
|
|
object ToolButton3: TToolButton
|
|
Left = 46
|
|
Top = 0
|
|
Width = 8
|
|
Caption = 'ToolButton3'
|
|
ImageIndex = 2
|
|
Style = tbsSeparator
|
|
end
|
|
object btnMoveUpGroup: TToolButton
|
|
Left = 54
|
|
Top = 0
|
|
Action = aMoveUpGroup
|
|
AllowAllUp = True
|
|
end
|
|
object btnMoveDownGroup: TToolButton
|
|
Left = 77
|
|
Top = 0
|
|
Action = aMoveDownGroup
|
|
end
|
|
end
|
|
end
|
|
end
|
|
object TabSheet1: TTabSheet
|
|
Caption = 'Key Tips'
|
|
ImageIndex = 5
|
|
TabVisible = False
|
|
object tvKeyTips: TTreeView
|
|
Left = 11
|
|
Top = 13
|
|
Width = 314
|
|
Height = 204
|
|
Indent = 19
|
|
TabOrder = 0
|
|
end
|
|
end
|
|
end
|
|
object Panel2: TPanel
|
|
Left = 0
|
|
Top = 8
|
|
Width = 6
|
|
Height = 266
|
|
Align = alLeft
|
|
BevelOuter = bvNone
|
|
TabOrder = 2
|
|
end
|
|
object Panel3: TPanel
|
|
Left = 360
|
|
Top = 8
|
|
Width = 6
|
|
Height = 266
|
|
Align = alRight
|
|
BevelOuter = bvNone
|
|
TabOrder = 3
|
|
end
|
|
object Panel4: TPanel
|
|
Left = 0
|
|
Top = 0
|
|
Width = 366
|
|
Height = 8
|
|
Align = alTop
|
|
BevelOuter = bvNone
|
|
TabOrder = 4
|
|
end
|
|
object alGroupCustomize: TActionList
|
|
Left = 48
|
|
Top = 280
|
|
Images = imgGroup
|
|
object aAddGroup: TAction
|
|
Category = 'Groups'
|
|
Caption = 'Add Group'
|
|
Hint = 'Add Group (Ins)'
|
|
ImageIndex = 0
|
|
OnExecute = aAddGroupExecute
|
|
end
|
|
object aDeleteGroup: TAction
|
|
Category = 'Groups'
|
|
Caption = 'Delete Group'
|
|
Hint = 'Delete Group (Del)'
|
|
ImageIndex = 1
|
|
OnExecute = aDeleteGroupExecute
|
|
end
|
|
object aMoveUpGroup: TAction
|
|
Tag = -1
|
|
Category = 'Groups'
|
|
Caption = 'Move Up Group'
|
|
Hint = 'Move Up Group'
|
|
ImageIndex = 2
|
|
OnExecute = aMoveGroupExecute
|
|
end
|
|
object aMoveDownGroup: TAction
|
|
Tag = 1
|
|
Category = 'Groups'
|
|
Caption = 'Move Down Group'
|
|
Hint = 'Move Down Group'
|
|
ImageIndex = 3
|
|
OnExecute = aMoveGroupExecute
|
|
end
|
|
object aAddGroupItem: TAction
|
|
Category = 'GroupItems'
|
|
Caption = '&Add...'
|
|
ImageIndex = 0
|
|
OnExecute = aAddGroupItemExecute
|
|
end
|
|
object aDeleteGroupItem: TAction
|
|
Category = 'GroupItems'
|
|
Caption = 'Delete'
|
|
ImageIndex = 1
|
|
OnExecute = aDeleteGroupItemExecute
|
|
end
|
|
object aMoveUpGroupItem: TAction
|
|
Tag = -1
|
|
Category = 'GroupItems'
|
|
Caption = 'Move Up Item'
|
|
ImageIndex = 2
|
|
OnExecute = aMoveGroupItemExecute
|
|
end
|
|
object aMoveDownGroupItem: TAction
|
|
Tag = 1
|
|
Category = 'GroupItems'
|
|
Caption = 'aMoveDownGroupItem'
|
|
ImageIndex = 3
|
|
OnExecute = aMoveGroupItemExecute
|
|
end
|
|
end
|
|
end
|