unit1.dfm

<<C++Builder 6实用编程100例>>随书光盘

object Form1: TForm1
  Left = 359
  Top = 239
  Width = 363
  Height = 285
  Caption = 'Menu'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  PopupMenu = PopupMenu1
  PixelsPerInch = 96
  TextHeight = 13
  object MainMenu1: TMainMenu
    Left = 40
    Top = 24
    object File1: TMenuItem
      Caption = '&File'
      object New1: TMenuItem
        Caption = '&New'
        ShortCut = 16462
        object Application1: TMenuItem
          Caption = 'Application'
        end
        object Form1: TMenuItem
          Caption = 'Form'
        end
        object Unit1: TMenuItem
          Caption = 'Unit'
        end
        object N10: TMenuItem
          Caption = '-'
        end
        object Other1: TMenuItem
          Caption = 'Other...'
        end
      end
      object Open1: TMenuItem
        Caption = '&Open'
        ShortCut = 16463
      end
      object Close1: TMenuItem
        Caption = '&Close'
      end
      object N3: TMenuItem
        Caption = '-'
      end
      object Save1: TMenuItem
        Caption = '&Save'
        ShortCut = 16467
      end
      object SaveAs1: TMenuItem
        Caption = 'Save &As...'
      end
      object N2: TMenuItem
        Caption = '-'
      end
      object Print1: TMenuItem
        Caption = '&Print'
        ShortCut = 16464
      end
      object PrintSetup1: TMenuItem
        Caption = 'Prin&t Setup...'
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object Exit1: TMenuItem
        Caption = 'E&xit'
      end
    end
    object Edit1: TMenuItem
      Caption = '&Edit'
      object Undo1: TMenuItem
        Caption = '&Undo'
        ShortCut = 16474
      end
      object Repeatcommand1: TMenuItem
        Caption = '&Repeat <command>'
      end
      object N6: TMenuItem
        Caption = '-'
      end
      object Cut1: TMenuItem
        Caption = 'Cu&t'
        ShortCut = 16472
      end
      object Copy1: TMenuItem
        Caption = '&Copy'
        ShortCut = 16451
      end
      object Paste1: TMenuItem
        Caption = '&Paste'
        ShortCut = 16470
      end
      object PasteSpecial1: TMenuItem
        Caption = 'Paste &Special...'
      end
      object N5: TMenuItem
        Caption = '-'
      end
      object Find1: TMenuItem
        Caption = '&Find...'
      end
      object Replace1: TMenuItem
        Caption = 'R&eplace...'
      end
      object GoTo1: TMenuItem
        Caption = '&Go To...'
      end
      object N4: TMenuItem
        Caption = '-'
      end
      object Links1: TMenuItem
        Caption = 'Lin&ks...'
      end
      object Object1: TMenuItem
        Caption = '&Object'
      end
    end
    object Window1: TMenuItem
      Caption = '&Window'
      object NewWindow1: TMenuItem
        Caption = '&New Window'
      end
      object Tile1: TMenuItem
        Caption = '&Tile'
      end
      object Cascade1: TMenuItem
        Caption = '&Cascade'
      end
      object ArrangeAll1: TMenuItem
        Caption = '&Arrange All'
      end
      object N7: TMenuItem
        Caption = '-'
      end
      object Hide1: TMenuItem
        Caption = '&Hide'
      end
      object Show1: TMenuItem
        Caption = '&Show...'
      end
    end
    object Help1: TMenuItem
      Caption = '&Help'
      object Contents1: TMenuItem
        Caption = '&Contents'
      end
      object SearchforHelpOn1: TMenuItem
        Caption = '&Search for Help On...'
      end
      object HowtoUseHelp1: TMenuItem
        Caption = '&How to Use Help'
      end
      object About1: TMenuItem
        Caption = '&About...'
      end
    end
  end
  object PopupMenu1: TPopupMenu
    Left = 88
    Top = 24
    object SelectAll1: TMenuItem
      Caption = 'Select &All'
    end
    object N9: TMenuItem
      Caption = '-'
    end
    object Exut1: TMenuItem
      Caption = 'Cu&t'
    end
    object Copy2: TMenuItem
      Caption = '&Copy'
    end
    object Paste2: TMenuItem
      Caption = '&Paste'
    end
    object N8: TMenuItem
      Caption = '-'
    end
    object Exit2: TMenuItem
      Caption = '&Exit'
    end
  end
end