object MenuBuilder: TMenuBuilder Left = 267 Top = 165 Width = 433 Height = 276 Caption = 'Menu Designer' ParentFont = True Icon.Data = {} PopupMenu = MnuBuildPopup Position = poScreenCenter OnActivate = FormActivate OnCreate = FormCreate OnDestroy = FormDestroy OnDeactivate = FormDeactivate OnMouseDown = FormMouseDown OnResize = FormResize PixelsPerInch = 96 TextHeight = 13 object MnuBuildPopup: TPopupMenu HelpContext = 30100 OnPopup = MnuBuildPopupPopup Left = 8 Top = 8 object InsertItem: TMenuItem Caption = '&Insert' HelpContext = 2150 ShortCut = 45 OnClick = InsertItemClick end object DeleteItem: TMenuItem Caption = '&Delete' HelpContext = 2151 ShortCut = 46 OnClick = DeleteItemClick end object N1: TMenuItem Caption = '-' end object CreateSubmenu1: TMenuItem Caption = '&Create Submenu' HelpContext = 2152 ShortCut = 16423 OnClick = CreateSubmenu1Click end object TMenuItem Caption = '-' end object PopupMenu1SelectMenu: TMenuItem Caption = 'Se&lect Menu...' HelpContext = 2153 OnClick = PopupMenu1SelectMenuClick end object PopupMenu1SaveAsTemplate: TMenuItem Caption = '&Save As Template...' HelpContext = 2154 OnClick = PopupMenu1SaveAsTemplateClick end object PopupMenu1InsertFromTemplate: TMenuItem Caption = 'I&nsert From Template...' HelpContext = 2155 OnClick = PopupMenu1InsertFromTemplateClick end object PopupMenu1DeleteTemplates: TMenuItem Caption = 'D&elete Templates...' HelpContext = 2156 OnClick = PopupMenu1DeleteTemplatesClick end object InsertResourceItem: TMenuItem Caption = 'Insert From &Resource...' HelpContext = 2157 OnClick = InsertResourceItemClick end end object LoadMenuDlg: TOpenDialog Filter = 'Menu Files (*.mnu)|*.mnu|Resource Files (*.rc)|*.rc|All Files (*' + '.*) |*.*' Options = [ofHideReadOnly, ofShowHelp, ofPathMustExist, ofFileMustExist, ofEnableSizing] Title = 'Insert Menu From Resource' Left = 48 Top = 8 end end