Высокоуровневые методы информатики и программирования. Сивохин А.В - 116 стр.

     Font.Color = clWindowText
     Font.Height = -11
     Font.Name = 'MS Sans Serif'
     Font.Style = []
     Menu = OrlovMainMenu
     OldCreateOrder = False
     PixelsPerInch = 96
     TextHeight = 13
     object OrlovMainMenu: TMainMenu
      Left = 192
      Top = 88
      object miOrlovArrayForm: TMenuItem
       Caption = 'Array'
       object miCreateArrayForm: TMenuItem
        Caption = 'Create'
        OnClick = miCreateArrayFormClick
       end
       object miShowArrayForm: TMenuItem
        Caption = 'Show'
        OnClick = miShowArrayFormClick
       end
       object miHideArrayForm: TMenuItem
        Caption = 'Hide'
        OnClick = miHideArrayFormClick
       end
       object miCloseArrayForm: TMenuItem
        Caption = 'Close'
        OnClick = miCloseArrayFormClick
       end
       object miDestroyArrayForm: TMenuItem
        Caption = 'Destroy'
        OnClick = miDestroyArrayFormClick
       end
       object miExitArrayForm: TMenuItem
        Caption = 'Exit'
        OnClick = miExitArrayFormClick
       end
      end
      object miOrlovRecordForm: TMenuItem
       Caption = 'Record'
       object miCreateRecordForm: TMenuItem
        Caption = 'Create'
        OnClick = miCreateRecordFormClick
       end
       object miShowRecordForm: TMenuItem
        Caption = 'Show'
        OnClick = miShowRecordFormClick
93