home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World 2007 March
/
PCWorld_2007-03_cd.bin
/
komunikace
/
acehtml
/
acehtmlfreeware.exe
/
acehtmlfree.exe
/
0
/
RCDATA
/
TDXBARCUSTOMIZINGFORM
/
TDXBARCUSTOMIZINGFORM.txt
Wrap
Text File
|
2006-09-21
|
26KB
|
980 lines
object dxBarCustomizingForm: TdxBarCustomizingForm
Left = 326
Top = 151
BorderIcons = [biSystemMenu]
BorderStyle = bsDialog
Caption = 'Customize'
ClientHeight = 310
ClientWidth = 366
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = True
Position = poScreenCenter
OnActivate = FormActivate
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 274
Width = 366
Height = 36
Align = alBottom
BevelOuter = bvNone
TabOrder = 1
object BClose: TButton
Left = 205
Top = 6
Width = 75
Height = 23
Cancel = True
Caption = 'Close'
Default = True
ModalResult = 1
TabOrder = 1
OnClick = BCloseClick
end
object BHelp: TBitBtn
Left = 286
Top = 6
Width = 74
Height = 23
Caption = 'Help'
TabOrder = 2
OnClick = BHelpClick
Style = bsNew
end
object BtnResetAll: TButton
Left = 6
Top = 6
Width = 75
Height = 23
HelpContext = 878
Cancel = True
Caption = 'Reset &All'
TabOrder = 0
OnClick = BtnResetAllClick
end
end
object PageControl: TPageControl
Left = 6
Top = 8
Width = 354
Height = 266
ActivePage = TabSheet1
Align = alClient
TabOrder = 0
OnChange = PageControlChange
object TabSheet1: 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
Caption = '&Delete'
TabOrder = 3
OnClick = BBarDeleteClick
end
object BBarNew: TButton
Left = 239
Top = 21
Width = 104
Height = 22
Caption = '&New...'
TabOrder = 1
OnClick = BBarNewClick
end
object BBarRename: TButton
Left = 239
Top = 50
Width = 104
Height = 22
Caption = 'R&ename...'
TabOrder = 2
OnClick = BBarRenameClick
end
object BarsListBoxPlace: TListBox
Left = 4
Top = 20
Width = 227
Height = 213
ItemHeight = 13
TabOrder = 0
end
object BBarReset: TButton
Left = 239
Top = 108
Width = 104
Height = 22
Caption = '&Reset...'
TabOrder = 4
OnClick = BBarResetClick
end
object btnMakePage: TButton
Left = 240
Top = 210
Width = 101
Height = 22
Caption = '&Make Tab'
TabOrder = 5
OnClick = btnMakePageClick
end
end
object TabSheet2: TTabSheet
Caption = ' Commands '
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
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 = LCategories
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 LCategories: TListBox
Left = 0
Top = 0
Width = 135
Height = 147
Align = alLeft
ItemHeight = 13
TabOrder = 0
OnClick = LCategoriesClick
OnDragOver = LCategoriesDragOver
OnEndDrag = LCategoriesEndDrag
OnKeyDown = LCategoriesKeyDown
OnMouseDown = LCategoriesMouseDown
end
object LCommandsPlace: TListBox
Left = 142
Top = 0
Width = 194
Height = 147
Style = lbOwnerDrawVariable
Align = alRight
Color = clBtnFace
DragMode = dmAutomatic
ItemHeight = 22
TabOrder = 1
OnClick = LCommandsClick
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 = 231
Height = 40
AutoSize = False
WordWrap = True
end
object Bevel1: TBevel
Left = 0
Top = 10
Width = 231
Height = 5
Shape = bsTopLine
end
object LabelDescription: TLabel
Left = 0
Top = 4
Width = 59
Height = 13
Caption = 'Description '
end
object lblShortcut: TLabel
Left = 235
Top = 4
Width = 43
Height = 13
Caption = 'Shortcut:'
end
object hkeyShortcut: THotKey
Left = 235
Top = 20
Width = 101
Height = 21
HotKey = 0
InvalidKeys = []
Modifiers = []
TabOrder = 0
OnExit = hkeyShortcutExit
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 tabPages: TTabSheet
Caption = 'Tabs'
ImageIndex = 5
OnShow = tabPagesShow
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
object lblPages: TLabel
Left = 4
Top = 4
Width = 33
Height = 13
Caption = '&Pages:'
end
object lboxPages: TListBox
Left = 4
Top = 20
Width = 227
Height = 213
ItemHeight = 13
TabOrder = 0
end
object btnNewPage: TButton
Left = 239
Top = 21
Width = 104
Height = 22
Caption = '&New...'
TabOrder = 1
OnClick = btnNewPageClick
end
object btnRenamePage: TButton
Left = 239
Top = 50
Width = 104
Height = 22
Caption = 'R&ename...'
Enabled = False
TabOrder = 2
OnClick = btnRenamePageClick
end
object btnDeletePage: TButton
Left = 239
Top = 79
Width = 104
Height = 22
Caption = '&Delete'
Enabled = False
TabOrder = 3
OnClick = btnDeletePageClick
end
object btnResetPage: TButton
Left = 239
Top = 108
Width = 104
Height = 22
Caption = '&Reset...'
Enabled = False
TabOrder = 4
OnClick = btnResetPageClick
end
object btnUp: TButton
Left = 239
Top = 150
Width = 104
Height = 22
Caption = '&Up'
Enabled = False
TabOrder = 5
OnClick = btnUpClick
end
object btnDown: TButton
Left = 239
Top = 179
Width = 104
Height = 22
Caption = '&Down'
Enabled = False
TabOrder = 6
OnClick = btnDownClick
end
object btnMakebar: TButton
Left = 240
Top = 210
Width = 101
Height = 22
Caption = '&Make Toolbar'
Enabled = False
TabOrder = 7
OnClick = btnMakebarClick
end
end
object TabSheet3: TTabSheet
Caption = ' Options '
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
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 = 0
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 = 0
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 TabSheet4: TTabSheet
Caption = ' All commands '
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
object LAllCommands: TListBox
Left = 6
Top = 8
Width = 333
Height = 200
Style = lbOwnerDrawFixed
ItemHeight = 16
TabOrder = 0
OnClick = LAllCommandsClick
OnDrawItem = LAllCommandsDrawItem
end
object CBShowCommandsWithShortCut: TCheckBox
Left = 6
Top = 216
Width = 333
Height = 17
Caption = 'Show commands that may have a shortcut'
Checked = True
State = cbChecked
TabOrder = 1
OnClick = CBShowCommandsWithShortCutClick
end
end
object TabSheet5: TTabSheet
Caption = 'Groups'
ExplicitLeft = 0
ExplicitTop = 0
ExplicitWidth = 0
ExplicitHeight = 0
object btnMoveUp: TSpeedButton
Left = 147
Top = 76
Width = 29
Height = 25
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
8888888888888888888888888888888888888888800000888888888880666088
8888888880666088888888888066608888888800006660000888888066666660
8888888806666608888888888066608888888888880608888888888888808888
8888888888888888888888888888888888888888888888888888}
OnClick = btnMoveUpClick
end
object btnMoveDown: TSpeedButton
Left = 147
Top = 108
Width = 29
Height = 25
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
8888888888888888888888888888888888888888888088888888888888060888
8888888880666088888888880666660888888880666666608888880000666000
0888888880666088888888888066608888888888806660888888888880000088
8888888888888888888888888888888888888888888888888888}
OnClick = btnMoveDownClick
end
object GroupBox1: TGroupBox
Left = 4
Top = 4
Width = 140
Height = 229
Caption = ' Groups '
TabOrder = 0
object lbGroups: TListBox
Left = 7
Top = 16
Width = 125
Height = 177
Style = lbOwnerDrawVariable
ItemHeight = 13
TabOrder = 0
OnClick = lbGroupsClick
OnDrawItem = lbGroupsDrawItem
OnEnter = lbGroupsEnter
OnKeyDown = lbGroupsKeyDown
OnMeasureItem = lbGroupsMeasureItem
end
object btnGroupAdd: TButton
Left = 7
Top = 199
Width = 61
Height = 23
Caption = 'Add'
TabOrder = 1
OnClick = btnGroupAddClick
end
object btnGroupDelete: TButton
Left = 71
Top = 199
Width = 61
Height = 23
Caption = 'Delete'
TabOrder = 2
OnClick = btnGroupDeleteClick
end
end
object GroupBox2: TGroupBox
Left = 179
Top = 4
Width = 162
Height = 229
Caption = ' Items '
TabOrder = 1
object lbGroupItems: TListBox
Left = 8
Top = 16
Width = 146
Height = 177
Style = lbOwnerDrawVariable
ItemHeight = 13
MultiSelect = True
TabOrder = 0
OnClick = lbGroupItemsClick
OnDrawItem = lbGroupItemsDrawItem
OnEnter = lbGroupItemsEnter
OnKeyDown = lbGroupItemsKeyDown
OnMeasureItem = lbGroupsMeasureItem
end
object btnGroupItemAdd: TButton
Left = 20
Top = 199
Width = 61
Height = 23
Caption = '&Add...'
TabOrder = 1
OnClick = btnGroupItemAddClick
end
object btnGroupItemDelete: TButton
Left = 85
Top = 199
Width = 57
Height = 23
Caption = 'Delete'
TabOrder = 2
OnClick = btnGroupItemDeleteClick
end
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 BarManager1: TdxBarManager
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Bars = <>
Categories.Strings = (
'Categories'
'Commands')
Categories.ItemsVisibles = (
2
2)
Categories.Visibles = (
True
True)
PopupMenuLinks = <>
StretchGlyphs = False
UseSystemFont = False
Left = 95
Top = 278
DockControlHeights = (
0
0
0
0)
object CategoriesAdd: TdxBarButton
Caption = 'Add...'
Category = 0
Hint = 'Add'
Visible = ivAlways
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
888888888888888888888800000000000888880FFFFFFFFF0888880FFFFFFFFF
0888880FFFFFFFFF0888880FFFFFFFFF0888880FFFFFFFFF0888880FFFFFFFFF
0888880FFFFFFFFF0888880FFFFFFFFF0888880FFFFFF0000888880FFFFFF0F0
8888880FFFFFF008888888000000008888888888888888888888}
OnClick = CategoriesAddClick
end
object CategoriesInsert: TdxBarButton
Caption = 'Insert...'
Category = 0
Hint = 'Insert'
Visible = ivAlways
ShortCut = 45
OnClick = CategoriesInsertClick
end
object CategoriesRename: TdxBarButton
Caption = 'Rename...'
Category = 0
Hint = 'Rename'
Visible = ivAlways
OnClick = CategoriesRenameClick
end
object CategoriesVisible: TdxBarButton
Caption = 'Visible'
Category = 0
Hint = 'Visible'
Visible = ivAlways
ButtonStyle = bsChecked
OnClick = CategoriesVisibleClick
end
object CommandsAdd: TdxBarButton
Caption = 'Add...'
Category = 1
Hint = 'Add'
Visible = ivAlways
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
888888888888888888888800000000000888880FFFFFFFFF0888880FFFFFFFFF
0888880FFFFFFFFF0888880FFFFFFFFF0888880FFFFFFFFF0888880FFFFFFFFF
0888880FFFFFFFFF0888880FFFFFFFFF0888880FFFFFF0000888880FFFFFF0F0
8888880FFFFFF008888888000000008888888888888888888888}
ShortCut = 45
OnClick = CommandsAddClick
end
object CommandsDelete: TdxBarButton
Caption = 'Delete'
Category = 1
Hint = 'Delete'
Visible = ivAlways
Glyph.Data = {
EE000000424DEE000000000000007600000028000000100000000F0000000100
0400000000007800000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
888888888888888880F88880F8888888888888000F8888880F8888000F888880
F888888000F88800F8888888000F800F88888888800000F88888888888000F88
88888888800000F888888888000F80F88888880000F88800F88880000F888880
0F88800F8888888800F88888888888888888}
ShortCut = 46
OnClick = CommandsDeleteClick
end
object CommandsClear: TdxBarButton
Caption = 'Clear'
Category = 1
Hint = 'Clear'
Visible = ivAlways
OnClick = CommandsClearClick
end
object CommandsMoveUp: TdxBarButton
Caption = 'Move Up'
Category = 1
Hint = 'Move Up'
Visible = ivAlways
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
8888888888888888888888888888888888888888800000888888888880666088
8888888880666088888888888066608888888800006660000888888066666660
8888888806666608888888888066608888888888880608888888888888808888
8888888888888888888888888888888888888888888888888888}
ShortCut = 16422
OnClick = CommandsMoveUpClick
end
object CommandsMoveDown: TdxBarButton
Caption = 'Move Down'
Category = 1
Hint = 'Move Down'
Visible = ivAlways
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
8888888888888888888888888888888888888888888088888888888888060888
8888888880666088888888880666660888888880666666608888880000666000
0888888880666088888888888066608888888888806660888888888880000088
8888888888888888888888888888888888888888888888888888}
ShortCut = 16424
OnClick = CommandsMoveDownClick
end
object CommandsSubMenuEditor: TdxBarButton
Caption = 'SubMenu Editor...'
Category = 1
Hint = 'SubMenu Editor'
Visible = ivAlways
OnClick = CommandsSubMenuEditorClick
end
object CategoriesItemsVisible: TdxBarCombo
Caption = 'Items Visible:'
Category = 0
Hint = 'Items Visible:'
Visible = ivAlways
OnChange = CategoriesItemsVisibleChange
Width = 100
ShowEditor = False
Items.Strings = (
'Never'
'InCustomizing'
'Always')
ItemIndex = -1
end
object CategoriesDelete: TdxBarButton
Caption = 'Delete'
Category = 0
Hint = 'Delete'
Visible = ivAlways
Glyph.Data = {
EE000000424DEE000000000000007600000028000000100000000F0000000100
0400000000007800000000000000000000001000000000000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
888888888888888880F88880F8888888888888000F8888880F8888000F888880
F888888000F88800F8888888000F800F88888888800000F88888888888000F88
88888888800000F888888888000F80F88888880000F88800F88880000F888880
0F88800F8888888800F88888888888888888}
ShortCut = 46
OnClick = CategoriesDeleteClick
end
end
object CategoriesPopupMenu: TdxBarPopupMenu
BarManager = BarManager1
ItemLinks = <
item
Item = CategoriesAdd
Visible = True
end
item
Item = CategoriesInsert
Visible = True
end
item
Item = CategoriesRename
Visible = True
end
item
BeginGroup = True
Item = CategoriesVisible
Visible = True
end
item
Item = CategoriesItemsVisible
Visible = True
end
item
BeginGroup = True
Item = CategoriesDelete
Visible = True
end>
UseOwnFont = False
OnPopup = CategoriesPopupMenuPopup
Left = 129
Top = 278
end
object CommandsPopupMenu: TdxBarPopupMenu
BarManager = BarManager1
ItemLinks = <
item
Item = CommandsAdd
Visible = True
end
item
Item = CommandsDelete
Visible = True
end
item
Item = CommandsClear
Visible = True
end
item
BeginGroup = True
Item = CommandsMoveUp
Visible = True
end
item
Item = CommandsMoveDown
Visible = True
end
item
BeginGroup = True
Item = CommandsSubMenuEditor
Visible = True
end>
UseOwnFont = False
OnPopup = CommandsPopupMenuPopup
Left = 161
Top = 278
end
end