main.~dfm

我的本科毕业代码,基本功能都出来了.不是特别好,请指教

object mainForm: TmainForm
  Left = 261
  Top = 164
  Width = 696
  Height = 500
  Caption = #39640#26657#22270#20070#31649#29702#31995#32479
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIForm
  Menu = MainMenu1
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  object StatusBar1: TStatusBar
    Left = 0
    Top = 427
    Width = 688
    Height = 19
    Panels = <
      item
        Width = 50
      end>
  end
  object Database1: TDatabase
    AliasName = 'mybase'
    DatabaseName = 'aaa'
    LoginPrompt = False
    Params.Strings = (
      'USER NAME=sa'
      'PASSWORD=LQ731Zzg')
    SessionName = 'Default'
  end
  object MainMenu1: TMainMenu
    object N1: TMenuItem
      Caption = #31995#32479
      object N11: TMenuItem
        Caption = #30331#24405#31995#32479
        OnClick = N11Click
      end
      object N12: TMenuItem
        Caption = #29992#25143#31649#29702
        Visible = False
        OnClick = N12Click
      end
      object N13: TMenuItem
        Caption = #20462#25913#23494#30721
        OnClick = N13Click
      end
      object N14: TMenuItem
        Caption = #20851#38381#31995#32479
        OnClick = N14Click
      end
    end
    object N2: TMenuItem
      Caption = #37319#32534
      Visible = False
      object N21: TMenuItem
        Caption = #32534#30446
        Visible = False
        OnClick = N21Click
      end
      object N22: TMenuItem
        Caption = #20856#34255
        Visible = False
        OnClick = N22Click
      end
      object N23: TMenuItem
        Caption = #35777#35746
        Visible = False
        OnClick = N23Click
      end
    end
    object N3: TMenuItem
      Caption = #20511#38405
      Visible = False
      object N31: TMenuItem
        Caption = #35835#32773#31649#29702
        Visible = False
        OnClick = N31Click
      end
      object N32: TMenuItem
        Caption = #20511#38405#31649#29702
        Visible = False
        OnClick = N32Click
      end
    end
  end
end