unit8.dfm

成绩管理系统 主要实现：学生（学号

object Form8: TForm8
  Left = 243
  Top = 200
  Width = 696
  Height = 480
  Caption = #26597#25214
  Color = clSkyBlue
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object RadioGroup1: TRadioGroup
    Left = 32
    Top = 24
    Width = 305
    Height = 105
    Caption = #35831#36873#25321#26597#25214#31867#22411
    TabOrder = 0
  end
  object RadioButton1: TRadioButton
    Left = 72
    Top = 56
    Width = 113
    Height = 17
    Caption = #23398' '#29983#20449#24687
    TabOrder = 1
  end
  object RadioButton2: TRadioButton
    Left = 72
    Top = 88
    Width = 113
    Height = 17
    Caption = #25104' '#32489#20449#24687
    TabOrder = 2
  end
  object GroupBox1: TGroupBox
    Left = 344
    Top = 24
    Width = 329
    Height = 105
    Caption = #36755#20837#26694
    TabOrder = 3
    object Label1: TLabel
      Left = 32
      Top = 32
      Width = 49
      Height = 13
      AutoSize = False
      Caption = #29677' '#21495
    end
    object Label2: TLabel
      Left = 32
      Top = 64
      Width = 34
      Height = 13
      Caption = #20998'  '#25968
      Transparent = True
    end
    object Edit1: TEdit
      Left = 104
      Top = 24
      Width = 121
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 0
    end
    object ComboBox1: TComboBox
      Left = 104
      Top = 64
      Width = 121
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      ItemHeight = 13
      TabOrder = 1
      Text = '60'#20197#19978
      Items.Strings = (
        '60'#20197#19979
        '60'#20197#19978
        '60-69'
        '70-79'
        '80-89'
        '90-100')
    end
  end
  object DBGrid1: TDBGrid
    Left = 16
    Top = 160
    Width = 473
    Height = 281
    DataSource = DataSource1
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    TabOrder = 4
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
  end
  object Button1: TButton
    Left = 560
    Top = 200
    Width = 75
    Height = 25
    Caption = #26597'  '#25214
    TabOrder = 5
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 560
    Top = 320
    Width = 75
    Height = 25
    Caption = #36820'  '#22238
    TabOrder = 6
    OnClick = Button2Click
  end
  object Button3: TButton
    Left = 560
    Top = 264
    Width = 75
    Height = 25
    Caption = #28165'  '#31354
    TabOrder = 7
    OnClick = Button3Click
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Top = 8
  end
  object ADOQuery1: TADOQuery
    Connection = Form1.ADOConnection1
    Parameters = <>
    Top = 56
  end
end