| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181 | 
							- object TBItemEditForm: TTBItemEditForm
 
-   Left = 200
 
-   Top = 104
 
-   BorderIcons = [biSystemMenu, biMinimize]
 
-   ClientHeight = 247
 
-   ClientWidth = 440
 
-   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 Splitter1: TSplitter
 
-     Left = 129
 
-     Top = 21
 
-     Height = 226
 
-     ResizeStyle = rsUpdate
 
-   end
 
-   object TreeView: TTreeView
 
-     Left = 0
 
-     Top = 21
 
-     Width = 129
 
-     Height = 226
 
-     Align = alLeft
 
-     HideSelection = False
 
-     Indent = 19
 
-     ReadOnly = True
 
-     ShowRoot = False
 
-     TabOrder = 2
 
-     OnChange = TreeViewChange
 
-     OnDragDrop = TreeViewDragDrop
 
-     OnDragOver = TreeViewDragOver
 
-     OnEnter = TreeViewEnter
 
-     OnKeyDown = TreeViewKeyDown
 
-     OnKeyPress = TreeViewKeyPress
 
-   end
 
-   object ListView: TListView
 
-     Left = 132
 
-     Top = 21
 
-     Width = 308
 
-     Height = 226
 
-     Align = alClient
 
-     Columns = <
 
-       item
 
-         Caption = 'Caption'
 
-         Width = 160
 
-       end
 
-       item
 
-         Caption = 'Type'
 
-         Width = 120
 
-       end>
 
-     ColumnClick = False
 
-     DragMode = dmAutomatic
 
-     HideSelection = False
 
-     MultiSelect = True
 
-     ReadOnly = True
 
-     RowSelect = True
 
-     PopupMenu = TBPopupMenu1
 
-     TabOrder = 1
 
-     ViewStyle = vsReport
 
-     OnChange = ListViewChange
 
-     OnDblClick = ListViewDblClick
 
-     OnEnter = ListViewEnter
 
-     OnDragDrop = ListViewDragDrop
 
-     OnDragOver = ListViewDragOver
 
-     OnKeyDown = ListViewKeyDown
 
-     OnKeyPress = ListViewKeyPress
 
-   end
 
-   object Toolbar: TTBToolbar
 
-     Left = 0
 
-     Top = 0
 
-     Width = 440
 
-     Height = 21
 
-     Align = alTop
 
-     Caption = 'Toolbar'
 
-     DockPos = 0
 
-     FullSize = True
 
-     LinkSubitems = ToolbarItems
 
-     ParentShowHint = False
 
-     ShowHint = True
 
-     TabOrder = 0
 
-   end
 
-   object TBPopupMenu1: TTBPopupMenu
 
-     LinkSubitems = ToolbarItems
 
-     Left = 256
 
-     Top = 120
 
-   end
 
-   object TBItemContainer1: TTBItemContainer
 
-     Left = 224
 
-     Top = 120
 
-     object ToolbarItems: TTBSubmenuItem
 
-       object NewItemButton: TTBItem
 
-         Caption = 'New &Item'
 
-         Hint = 'New Item'
 
-         ImageIndex = 0
 
-         ShortCut = 45
 
-         OnClick = NewItemButtonClick
 
-       end
 
-       object NewSubmenuButton: TTBItem
 
-         Caption = 'New &Submenu'
 
-         Hint = 'New Submenu'
 
-         ImageIndex = 1
 
-         ShortCut = 16429
 
-         OnClick = NewSubmenuButtonClick
 
-       end
 
-       object NewSepButton: TTBItem
 
-         Caption = 'New Se¶tor'
 
-         Hint = 'New Separator'
 
-         ImageIndex = 2
 
-         ShortCut = 189
 
-         OnClick = NewSepButtonClick
 
-       end
 
-       object MoreMenu: TTBSubmenuItem
 
-         Caption = '&More'
 
-         Options = [tboDropdownArrow]
 
-       end
 
-       object TBSeparatorItem1: TTBSeparatorItem
 
-       end
 
-       object CutButton: TTBItem
 
-         Caption = 'Cu&t'
 
-         Enabled = False
 
-         Hint = 'Cut'
 
-         ImageIndex = 5
 
-         OnClick = CutButtonClick
 
-       end
 
-       object CopyButton: TTBItem
 
-         Caption = '&Copy'
 
-         Enabled = False
 
-         Hint = 'Copy'
 
-         ImageIndex = 4
 
-         OnClick = CopyButtonClick
 
-       end
 
-       object PasteButton: TTBItem
 
-         Caption = '&Paste'
 
-         Hint = 'Paste'
 
-         ImageIndex = 6
 
-         OnClick = PasteButtonClick
 
-       end
 
-       object DeleteButton: TTBItem
 
-         Caption = '&Delete Item'
 
-         Enabled = False
 
-         Hint = 'Delete Item'
 
-         ImageIndex = 3
 
-         ShortCut = 46
 
-         OnClick = DeleteButtonClick
 
-       end
 
-       object TBSeparatorItem2: TTBSeparatorItem
 
-       end
 
-       object MoveUpButton: TTBItem
 
-         Caption = 'Move &Up'
 
-         Hint = 'Move Up'
 
-         ImageIndex = 7
 
-         ShortCut = 32806
 
-         OnClick = MoveUpButtonClick
 
-       end
 
-       object MoveDownButton: TTBItem
 
-         Caption = 'Move D&own'
 
-         Hint = 'Move Down'
 
-         ImageIndex = 8
 
-         ShortCut = 32808
 
-         OnClick = MoveDownButtonClick
 
-       end
 
-       object TBSeparatorItem3: TTBSeparatorItem
 
-       end
 
-       object TBSubmenuItem1: TTBSubmenuItem
 
-         Caption = '&Tools'
 
-         Options = [tboDropdownArrow]
 
-         object TConvertMenu: TTBItem
 
-           Caption = '&Convert TMainMenu/TPopupMenu...'
 
-           OnClick = TConvertMenuClick
 
-         end
 
-       end
 
-     end
 
-   end
 
- end
 
 
  |