unit1.dfm

Delphi7应用编程150例 附书源码

object frmMain: TfrmMain
  Left = 192
  Top = 107
  Width = 282
  Height = 257
  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
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object btnAddItem: TButton
    Left = 88
    Top = 80
    Width = 81
    Height = 25
    Caption = #28155#21152#33756#21333#39033
    TabOrder = 0
    OnClick = btnAddItemClick
  end
  object btnAddMenu: TButton
    Left = 88
    Top = 112
    Width = 81
    Height = 25
    Caption = #28155#21152#33756#21333
    TabOrder = 1
    OnClick = btnAddMenuClick
  end
  object MainMenu1: TMainMenu
    AutoHotkeys = maManual
    Left = 112
    Top = 40
    object mnuFile: TMenuItem
      Caption = #25991#20214
      object mnuNew: TMenuItem
        Caption = #26032#24314
      end
    end
  end
end