Create mnuMain As QMAINMENU
Parent = QFORM
  Create mnuFile As QMENUITEM
    Caption = "&File"
    Checked = 0
    Enabled = 1
    Visible = 1
    Create mnuNew As QMENUITEM
      Caption = "&New"
      Checked = 0
      Enabled = 1
      Visible = 1
      ShortCut = "Ctrl+N"
    End Create
    Create mnuOpen As QMENUITEM
      Caption = "&Open"
      Checked = 0
      Enabled = 1
      Visible = 1
      ShortCut = "Ctrl+O"
    End Create
    Create mnuSave As QMENUITEM
      Caption = "&Save"
      Checked = 0
      Enabled = 1
      Visible = 1
      ShortCut = "Ctrl+S"
    End Create
    Create mnuSaveAs As QMENUITEM
      Caption = "Save&As"
      Checked = 0
      Enabled = 1
      Visible = 1
    End Create
    Create mnuPrint As QMENUITEM
      Caption = "&Print"
      Checked = 0
      Enabled = 1
      Visible = 1
      ShortCut = "Ctrl+P"
    End Create
    Create mnuExit As QMENUITEM
      Caption = "&Exit"
      Checked = 0
      Enabled = 1
      Visible = 1
    End Create
  End Create
  Create mnuEdit As QMENUITEM
    Caption = "&Edit"
    Checked = 0
    Enabled = 1
    Visible = 1
    Create mnuUndo As QMENUITEM
      Caption = "&Undo"
      Checked = 0
      Enabled = 1
      Visible = 1
      ShortCut = "Ctrl+Z"
    End Create
    Create mnuCut As QMENUITEM
      Caption = "&Cut"
      Checked = 0
      Enabled = 1
      Visible = 1
      ShortCut = "Ctrl+X"
    End Create
    Create mnuCopy As QMENUITEM
      Caption = "C&opy"
      Checked = 0
      Enabled = 1
      Visible = 1
      ShortCut = "Ctrl+C"
    End Create
    Create mnuPaste As QMENUITEM
      Caption = "&Paste"
      Checked = 0
      Enabled = 1
      Visible = 1
      ShortCut = "Ctrl+V"
    End Create
  End Create
  Create mnuHelp As QMENUITEM
    Caption = "&Help"
    Checked = 0
    Enabled = 1
    Visible = 1
    Create mnuContents As QMENUITEM
      Caption = "&Contents"
      Checked = 0
      Enabled = 1
      Visible = 1
      ShortCut = "F1"
    End Create
    Create mnuAbout As QMENUITEM
      Caption = "&About"
      Checked = 0
      Enabled = 1
      Visible = 1
    End Create
  End Create
End Create