home *** CD-ROM | disk | FTP | other *** search
/ PC World Plus! (NZ) 2001 June / HDC50.iso / Runimage / Delphi50 / Bin / CORIDE50.BPL / 0 / RCDATA / TMENUBUILDER / TMENUBUILDER.txt < prev   
Text File  |  1999-08-11  |  2KB  |  84 lines
  1. object MenuBuilder: TMenuBuilder
  2.   Left = 267
  3.   Top = 165
  4.   Width = 433
  5.   Height = 276
  6.   Caption = 'Menu Designer'
  7.   ParentFont = True
  8.   Icon.Data = {<image000.ico>}
  9.   PopupMenu = MnuBuildPopup
  10.   Position = poScreenCenter
  11.   OnActivate = FormActivate
  12.   OnCreate = FormCreate
  13.   OnDestroy = FormDestroy
  14.   OnDeactivate = FormDeactivate
  15.   OnMouseDown = FormMouseDown
  16.   OnResize = FormResize
  17.   PixelsPerInch = 96
  18.   TextHeight = 13
  19.   object MnuBuildPopup: TPopupMenu
  20.     HelpContext = 30100
  21.     OnPopup = MnuBuildPopupPopup
  22.     Left = 8
  23.     Top = 8
  24.     object InsertItem: TMenuItem
  25.       Caption = '&Insert'
  26.       HelpContext = 2150
  27.       ShortCut = 45
  28.       OnClick = InsertItemClick
  29.     end
  30.     object DeleteItem: TMenuItem
  31.       Caption = '&Delete'
  32.       HelpContext = 2151
  33.       ShortCut = 46
  34.       OnClick = DeleteItemClick
  35.     end
  36.     object N1: TMenuItem
  37.       Caption = '-'
  38.     end
  39.     object CreateSubmenu1: TMenuItem
  40.       Caption = '&Create Submenu'
  41.       HelpContext = 2152
  42.       ShortCut = 16423
  43.       OnClick = CreateSubmenu1Click
  44.     end
  45.     object TMenuItem
  46.       Caption = '-'
  47.     end
  48.     object PopupMenu1SelectMenu: TMenuItem
  49.       Caption = 'Se&lect Menu...'
  50.       HelpContext = 2153
  51.       OnClick = PopupMenu1SelectMenuClick
  52.     end
  53.     object PopupMenu1SaveAsTemplate: TMenuItem
  54.       Caption = '&Save As Template...'
  55.       HelpContext = 2154
  56.       OnClick = PopupMenu1SaveAsTemplateClick
  57.     end
  58.     object PopupMenu1InsertFromTemplate: TMenuItem
  59.       Caption = 'I&nsert From Template...'
  60.       HelpContext = 2155
  61.       OnClick = PopupMenu1InsertFromTemplateClick
  62.     end
  63.     object PopupMenu1DeleteTemplates: TMenuItem
  64.       Caption = 'D&elete Templates...'
  65.       HelpContext = 2156
  66.       OnClick = PopupMenu1DeleteTemplatesClick
  67.     end
  68.     object InsertResourceItem: TMenuItem
  69.       Caption = 'Insert From &Resource...'
  70.       HelpContext = 2157
  71.       OnClick = InsertResourceItemClick
  72.     end
  73.   end
  74.   object LoadMenuDlg: TOpenDialog
  75.     Filter = 
  76.       'Menu Files (*.mnu)|*.mnu|Resource Files (*.rc)|*.rc|All Files (*' +
  77.       '.*) |*.*'
  78.     Options = [ofHideReadOnly, ofShowHelp, ofPathMustExist, ofFileMustExist, ofEnableSizing]
  79.     Title = 'Insert Menu From Resource'
  80.     Left = 48
  81.     Top = 8
  82.   end
  83. end
  84.