cha1.dfm

本人集结心血制作的delphi版学生信息管理系统

object Form7: TForm7
  Left = 192
  Top = 107
  BorderStyle = bsDialog
  Caption = #23398#29983#23398#31821#20449#24687#26597#35810
  ClientHeight = 348
  ClientWidth = 536
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  PixelsPerInch = 96
  TextHeight = 13
  object CheckBox1: TCheckBox
    Left = 56
    Top = 8
    Width = 97
    Height = 17
    Caption = #23398#31821#21495
    TabOrder = 0
    OnClick = CheckBox1Click
  end
  object CheckBox2: TCheckBox
    Left = 56
    Top = 39
    Width = 97
    Height = 17
    Caption = #22995#21517
    TabOrder = 1
  end
  object CheckBox7: TCheckBox
    Left = 56
    Top = 101
    Width = 97
    Height = 17
    Caption = #29677#32423
    TabOrder = 2
  end
  object CheckBox3: TCheckBox
    Left = 56
    Top = 69
    Width = 97
    Height = 17
    Caption = #24180#32423
    TabOrder = 3
  end
  object ComboBox3: TComboBox
    Left = 160
    Top = 68
    Width = 121
    Height = 21
    ImeName = #32043#20809#25340#38899#36755#20837#27861
    ItemHeight = 13
    TabOrder = 4
    Items.Strings = (
      '2000'
      '2001'
      '2002'
      '2003'
      '2004'
      '2005'
      '2006'
      '2007'
      '2008'
      '2009'
      '2010')
  end
  object ComboBox4: TComboBox
    Left = 160
    Top = 100
    Width = 121
    Height = 21
    ImeName = #32043#20809#25340#38899#36755#20837#27861
    ItemHeight = 13
    TabOrder = 5
    Items.Strings = (
      '1'
      '2'
      '3'
      '4'
      '5'
      '6'
      '7'
      '8'
      '9'
      '10')
  end
  object DBGrid1: TDBGrid
    Left = 8
    Top = 128
    Width = 521
    Height = 209
    DataSource = DataSource1
    ImeName = #32043#20809#25340#38899#36755#20837#27861
    TabOrder = 6
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
  end
  object Edit1: TEdit
    Left = 160
    Top = 8
    Width = 121
    Height = 21
    ImeName = #32043#20809#25340#38899#36755#20837#27861
    TabOrder = 7
  end
  object Button1: TButton
    Left = 376
    Top = 96
    Width = 75
    Height = 25
    Caption = #26597#35810
    TabOrder = 8
    OnClick = Button1Click
  end
  object Edit2: TEdit
    Left = 160
    Top = 36
    Width = 121
    Height = 21
    ImeName = #32043#20809#25340#38899#36755#20837#27861
    TabOrder = 9
  end
  object CheckBox4: TCheckBox
    Left = 300
    Top = 74
    Width = 97
    Height = 17
    Caption = #19987#19994
    TabOrder = 10
    Visible = False
  end
  object ComboBox2: TComboBox
    Left = 404
    Top = 72
    Width = 121
    Height = 21
    ImeName = #32043#20809#25340#38899#36755#20837#27861
    ItemHeight = 13
    TabOrder = 11
    Visible = False
  end
  object CheckBox5: TCheckBox
    Left = 300
    Top = 42
    Width = 97
    Height = 17
    Caption = #38498#31995
    TabOrder = 12
    OnClick = CheckBox5Click
  end
  object ComboBox1: TComboBox
    Left = 404
    Top = 40
    Width = 121
    Height = 21
    ImeName = #32043#20809#25340#38899#36755#20837#27861
    ItemHeight = 13
    TabOrder = 13
    OnChange = ComboBox1Change
    Items.Strings = (
      #30005#27668#24037#31243#31995
      #35745#31639#26426#31185#23398#19982#25216#26415#31995
      #26426#26800#24037#31243#31995
      #22303#26408#24314#31569#24037#31243#31995
      #36164#28304#19982#29615#22659#24037#31243#31995
      #27979#37327#24037#31243#31995
      #36164#28304#19982#26448#26009#24037#31243#31995
      #24212#29992#25968#23398#19982#20449#24687#31185#23398#31995
      #32463#27982#31649#29702#31995
      #31038#20250#31185#23398#31995
      #22806#22269#35821#31995)
  end
  object CheckBox8: TCheckBox
    Left = 300
    Top = 7
    Width = 97
    Height = 17
    Caption = #35838#31243#21517
    TabOrder = 14
  end
  object ComboBox5: TComboBox
    Left = 404
    Top = 4
    Width = 121
    Height = 21
    ImeName = #32043#20809#25340#38899#36755#20837#27861
    ItemHeight = 13
    TabOrder = 15
    Items.Strings = (
      #32654#26415
      #25668#24433
      #27494#26415)
  end
  object ADOConnection1: TADOConnection
    Connected = True
    ConnectionString = 
      'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='#23398#29983'.mdb;Persist Secu' +
      'rity Info=False'
    LoginPrompt = False
    Mode = cmShareDenyNone
    Provider = 'Microsoft.Jet.OLEDB.4.0'
    Left = 16
  end
  object DataSource1: TDataSource
    DataSet = ADOQuery1
    Left = 16
    Top = 64
  end
  object ADOQuery1: TADOQuery
    Connection = ADOConnection1
    Parameters = <>
    Left = 16
    Top = 32
  end
end