object FormMenu: TFormMenu Left = 335 Height = 487 Top = 108 Width = 262 Caption = 'Navigation' ClientHeight = 487 ClientWidth = 262 OnCreate = FormCreate OnDestroy = FormDestroy LCLVersion = '0.9.31' object TabControl1: TTabControl Left = 0 Height = 26 Top = 0 Width = 262 TabIndex = 0 Tabs.Strings = ( 'All' 'Favorite' 'History' ) Align = alTop TabOrder = 0 end object TreeViewMenu: TTreeView Left = 2 Height = 457 Top = 28 Width = 258 Align = alClient BorderSpacing.Around = 2 DefaultItemHeight = 16 PopupMenu = PopupMenuObjectGroup ReadOnly = True TabOrder = 1 OnChange = TreeViewMenuChange OnDblClick = AObjectGroupShowExecute Options = [tvoAutoItemHeight, tvoHideSelection, tvoKeepCollapsedNodes, tvoReadOnly, tvoShowButtons, tvoShowLines, tvoShowRoot, tvoToolTips, tvoThemedDraw] end object PopupMenuObject: TPopupMenu Images = MainForm.ImageListActions left = 100 top = 164 object MenuItem1: TMenuItem Action = AObjectGroupShow Default = True end object MenuItem10: TMenuItem Action = AObjectEdit end object MenuItem9: TMenuItem Action = AObjectDelete end end object PopupMenuObjectGroup: TPopupMenu Images = MainForm.ImageListActions left = 100 top = 116 object MenuItem5: TMenuItem Action = AObjectGroupEdit Default = True end object MenuItem7: TMenuItem Action = AObjectGroupAddGroup end object MenuItem6: TMenuItem Action = AObjectGroupAddObject end object MenuItem8: TMenuItem Action = AObjectGroupDelete end end object ActionList1: TActionList left = 100 top = 214 object AObjectEdit: TAction Caption = 'Edit' end object AObjectDelete: TAction Caption = 'Delete' end object AObjectGroupEdit: TAction Caption = 'Edit' OnExecute = AObjectGroupEditExecute end object AObjectGroupAddObject: TAction Caption = 'Add' end object AObjectGroupAddGroup: TAction Caption = 'Add' end object AObjectGroupDelete: TAction Caption = 'Delete' OnExecute = AObjectGroupDeleteExecute end object AObjectGroupShow: TAction Caption = 'Show' OnExecute = AObjectGroupShowExecute end end end