unit6.dfm

用DELPHI7编的一个学成成绩管理系统,希望对你有所帮助

object Form6: TForm6
  Left = 124
  Top = 4
  Width = 630
  Height = 564
  Caption = #23398#29983#22522#26412#20449#24687
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 0
    Top = 0
    Width = 622
    Height = 537
    Align = alClient
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clNavy
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    object Label1: TLabel
      Left = 24
      Top = 49
      Width = 36
      Height = 13
      Caption = #23398#21495#65306
    end
    object Label2: TLabel
      Left = 8
      Top = 16
      Width = 96
      Height = 13
      Caption = #20197#19979#20026#24517#22635#20449#24687#65306
    end
    object Label3: TLabel
      Left = 24
      Top = 83
      Width = 36
      Height = 13
      Caption = #22995#21517#65306
    end
    object Label4: TLabel
      Left = 24
      Top = 120
      Width = 36
      Height = 13
      Caption = #27665#26063#65306
    end
    object Label5: TLabel
      Left = 24
      Top = 156
      Width = 60
      Height = 13
      Caption = #20986#29983#24180#26376#65306
    end
    object Label6: TLabel
      Left = 131
      Top = 155
      Width = 12
      Height = 13
      Caption = #24180
    end
    object Label7: TLabel
      Left = 181
      Top = 156
      Width = 12
      Height = 13
      Caption = #26376
    end
    object Label8: TLabel
      Left = 24
      Top = 190
      Width = 36
      Height = 13
      Caption = #36143#31821#65306
    end
    object Label9: TLabel
      Left = 24
      Top = 226
      Width = 36
      Height = 13
      Caption = #24615#21035#65306
    end
    object Label10: TLabel
      Left = 24
      Top = 258
      Width = 60
      Height = 13
      Caption = #25152#22312#31995#21035#65306
    end
    object Label11: TLabel
      Left = 24
      Top = 292
      Width = 60
      Height = 13
      Caption = #25152#22312#19987#19994#65306
    end
    object Label12: TLabel
      Left = 24
      Top = 326
      Width = 60
      Height = 13
      Caption = #25152#22312#29677#32423#65306
    end
    object Label13: TLabel
      Left = 24
      Top = 360
      Width = 60
      Height = 13
      Caption = #25919#27835#38754#30446#65306
    end
    object Label14: TLabel
      Left = 24
      Top = 390
      Width = 60
      Height = 13
      Caption = #23478#24237#20303#22336#65306
    end
    object Label15: TLabel
      Left = 24
      Top = 424
      Width = 60
      Height = 13
      Caption = #37038#25919#32534#30721#65306
    end
    object Label16: TLabel
      Left = 24
      Top = 460
      Width = 60
      Height = 13
      Caption = #32852#31995#30005#35805#65306
    end
    object Label17: TLabel
      Left = 272
      Top = 16
      Width = 96
      Height = 13
      Caption = #20197#19979#20026#36873#22635#20449#24687#65306
    end
    object Label18: TLabel
      Left = 292
      Top = 48
      Width = 72
      Height = 13
      Caption = #36523#20221#35777#21495#30721#65306
    end
    object Label19: TLabel
      Left = 293
      Top = 81
      Width = 60
      Height = 13
      Caption = #27605#19994#23398#26657#65306
    end
    object Label20: TLabel
      Left = 295
      Top = 116
      Width = 60
      Height = 13
      Caption = #29616#22312#23398#21382#65306
    end
    object Label21: TLabel
      Left = 296
      Top = 152
      Width = 60
      Height = 13
      Caption = #20010#20154#29305#38271#65306
    end
    object Label23: TLabel
      Left = 298
      Top = 379
      Width = 60
      Height = 13
      Caption = #20010#20154#22791#27880#65306
    end
    object Label24: TLabel
      Left = 299
      Top = 258
      Width = 36
      Height = 13
      Caption = #23398#21046#65306
    end
    object Label25: TLabel
      Left = 299
      Top = 302
      Width = 36
      Height = 13
      Caption = #22806#35821#65306
    end
    object Label22: TLabel
      Left = 298
      Top = 344
      Width = 60
      Height = 13
      Caption = #30005#23376#37038#31665#65306
    end
    object Edit1: TEdit
      Left = 64
      Top = 45
      Width = 166
      Height = 21
      ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
      TabOrder = 0
      OnKeyPress = Edit1KeyPress
    end
    object Edit2: TEdit
      Left = 65
      Top = 80
      Width = 165
      Height = 21
      ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
      TabOrder = 1
    end
    object Edit3: TEdit
      Left = 65
      Top = 116
      Width = 165
      Height = 21
      ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
      TabOrder = 2
    end
    object ComboBox1: TComboBox
      Left = 80
      Top = 152
      Width = 49
      Height = 21
      ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
      ItemHeight = 13
      ItemIndex = 20
      TabOrder = 3
      Text = '1980'
      Items.Strings = (
        '1960'
        '1961'
        '1962'
        '1963'
        '1964'
        '1965'
        '1966'
        '1967'
        '1968'
        '1969'
        '1970'
        '1971'
        '1972'
        '1973'
        '1974'
        '1975'
        '1976'
        '1977'
        '1978'
        '1979'
        '1980'
        '1981'
        '1982'
        '1983'
        '1984'
        '1985'
        '1986'
        '1987'
        '1988'
        '1989'
        '1990'
        '1991'
        '1992'
        '1993'
        '1994'
        '1995'
        '1996'
        '1997'
        '1998'
        '1999'
        '2000'
        '2001'
        '2002'
        '2003'
        '2004'
        '2005'
        ''
        ''
        ''
        ''
        ''
        ''
        '')
    end
    object ComboBox2: TComboBox
      Left = 145
      Top = 152
      Width = 33
      Height = 21
      ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
      ItemHeight = 13
      ItemIndex = 3
      TabOrder = 4
      Text = '4'
      Items.Strings = (
        '1'
        '2'
        '3'
        '4'
        '5'
        '6'
        '7'
        '8'
        '9'
        '10'
        '11'
        '12')
    end
    object Edit4: TEdit
      Left = 66
      Top = 187
      Width = 164
      Height = 21
      ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
      TabOrder = 5
    end
    object ComboBox3: TComboBox
      Left = 64
      Top = 222
      Width = 73
      Height = 21
      ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
      ItemHeight = 13
      ItemIndex = 0
      TabOrder = 6
      Text = '    '#30007
      Items.Strings = (
        '    '#30007
        '    '#22899)
    end
    object ComboBox4: TComboBox
      Left = 91
      Top = 254
      Width = 139
      Height = 21
      ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
      ItemHeight = 13
      TabOrder = 7
      Items.Strings = (
        #30005#23376#36890#35759#24037#31243#31995
        #35745#31639#26426#24037#31243#31995
        #31649#29702#24037#31243#31995
        #36731#21270#24037#31243#31995
        #33402#26415#23398#38498
        #39135#21697#24037#31243#31995
        #26426#30005#24037#31243#31995
        #24212#29992#22806#35821#31995
        #32463#27982#31995
        #26053#28216#31995
        #20256#25773#24037#31243#31995
        #27773#36710#31995
        #32487#32493#25945#32946#20013#24515)
    end
    object Edit5: TEdit
      Left = 92
      Top = 288
      Width = 138
      Height = 21
      ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
      TabOrder = 8
    end
    object Edit6: TEdit
      Left = 92
      Top = 322
      Width = 138
      Height = 21
      ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
      TabOrder = 9
    end
    object Edit7: TEdit
      Left = 93
      Top = 356
      Width = 137
      Height = 21
      ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
      TabOrder = 10
    end
    object Edit8: TEdit
      Left = 93
      Top = 388
      Width = 137
      Height = 21
      ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
      TabOrder = 11
    end
    object Edit9: TEdit
      Left = 93
      Top = 421
      Width = 137
      Height = 21
      ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
      TabOrder = 12
      OnKeyPress = Edit9KeyPress
    end
    object Edit10: TEdit
      Left = 93
      Top = 456
      Width = 137
      Height = 21
      ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
      TabOrder = 13
      OnKeyPress = Edit10KeyPress
    end
    object Panel1: TPanel
      Left = 265
      Top = 31
      Width = 2
      Height = 449
      BevelOuter = bvLowered
      TabOrder = 14
    end
    object Edit11: TEdit
      Left = 368
      Top = 42
      Width = 225
      Height = 21
      ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
      TabOrder = 15
    end
    object Edit12: TEdit
      Left = 360
      Top = 77
      Width = 233
      Height = 21
      ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
      TabOrder = 16
    end
    object Edit13: TEdit
      Left = 360
      Top = 112
      Width = 233
      Height = 21
      ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
      TabOrder = 17
    end
    object Memo1: TMemo
      Left = 360
      Top = 150
      Width = 233
      Height = 89
      ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
      Lines.Strings = (
        '')
      TabOrder = 18
    end
    object Memo2: TMemo
      Left = 360
      Top = 384
      Width = 233
      Height = 89
      ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
      Lines.Strings = (
        '')
      TabOrder = 19
    end
    object Edit14: TEdit
      Left = 344
      Top = 255
      Width = 249
      Height = 21
      ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
      TabOrder = 20
    end
    object Edit15: TEdit
      Left = 344
      Top = 297
      Width = 249
      Height = 21
      ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
      TabOrder = 21
    end
    object Panel3: TPanel
      Left = 24
      Top = 485
      Width = 569
      Height = 2
      BevelOuter = bvLowered
      TabOrder = 22
    end
    object GroupBox3: TGroupBox
      Left = 90
      Top = 491
      Width = 92
      Height = 33
      TabOrder = 23
      object SpeedButton2: TSpeedButton
        Left = 1
        Top = 6
        Width = 90
        Height = 26
        Caption = #24405#20837
        Flat = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clPurple
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        OnClick = SpeedButton2Click
      end
    end
    object GroupBox4: TGroupBox
      Left = 240
      Top = 492
      Width = 96
      Height = 33
      TabOrder = 24
      object SpeedButton3: TSpeedButton
        Left = 1
        Top = 6
        Width = 94
        Height = 26
        Caption = #37325#32622
        Flat = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clPurple
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        OnClick = SpeedButton3Click
      end
    end
    object GroupBox5: TGroupBox
      Left = 432
      Top = 492
      Width = 89
      Height = 33
      TabOrder = 25
      object SpeedButton4: TSpeedButton
        Left = 1
        Top = 6
        Width = 87
        Height = 26
        Caption = #21462#28040
        Flat = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clPurple
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        OnClick = SpeedButton4Click
      end
    end
    object Edit16: TEdit
      Left = 368
      Top = 339
      Width = 225
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
      TabOrder = 26
    end
  end
  object ADOQuery1: TADOQuery
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=ztj007.mdb;Persist ' +
      'Security Info=False'
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      '')
    Left = 232
    Top = 24
  end
end