mainview.dfm

Delphi利用MVC开发的典型例子

object ViewMain: TViewMain
  Left = 177
  Top = 157
  Width = 696
  Height = 480
  Caption = 'An eMVC Based Application'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object MainMenu1: TMainMenu
    Left = 56
    Top = 80
    object File1: TMenuItem
      Caption = '&File'
      object mnuExit: TMenuItem
        Caption = 'E&xit'
        OnClick = mnuExitClick
      end
    end
    object Help1: TMenuItem
      Caption = '&Help'
      object mnuHelp: TMenuItem
        Caption = '&Help'
      end
      object mnuAbout: TMenuItem
        Caption = '&About...'
      end
    end
  end
end