unit4.dfm

学生成绩管理系统

object Form4: TForm4
  Left = 281
  Top = 155
  Width = 645
  Height = 452
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = #23398#29983#25104#32489#32479#35745#31995#32479
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Scaled = False
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 13
  object Label11: TLabel
    Left = 8
    Top = 176
    Width = 73
    Height = 13
    Caption = #26597#35810#32467#26524
  end
  object Label8: TLabel
    Left = 320
    Top = 176
    Width = 81
    Height = 13
    Caption = #35745#31639#32467#26524
  end
  object Button3: TButton
    Left = 536
    Top = 272
    Width = 75
    Height = 73
    Caption = #36864#20986
    TabOrder = 0
    OnClick = Button3Click
  end
  object DBGrid1: TDBGrid
    Left = 0
    Top = 200
    Width = 313
    Height = 209
    DataSource = DataSource1
    ImeName = #20013#25991' ('#31616#20307') - '#25340#38899#21152#21152
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
  end
  object GroupBox1: TGroupBox
    Left = 8
    Top = 0
    Width = 305
    Height = 169
    Caption = #32508#21512#26597#35810
    TabOrder = 2
    object Label1: TLabel
      Left = 8
      Top = 24
      Width = 57
      Height = 13
      Caption = #36873#25321#29677#32423
    end
    object Label6: TLabel
      Left = 8
      Top = 56
      Width = 57
      Height = 13
      Caption = #36873#25321#31185#30446
    end
    object Label7: TLabel
      Left = 8
      Top = 120
      Width = 57
      Height = 13
      Caption = #36755#20837#20998#25968
    end
    object Label2: TLabel
      Left = 8
      Top = 88
      Width = 57
      Height = 13
      Caption = #32479#35745#26041#24335
    end
    object DBLookupComboBox1: TDBLookupComboBox
      Left = 80
      Top = 24
      Width = 121
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#25340#38899#21152#21152
      KeyField = #29677#32423
      ListField = #29677#32423
      ListSource = DataSource2
      TabOrder = 0
    end
    object DBLookupComboBox2: TDBLookupComboBox
      Left = 80
      Top = 56
      Width = 121
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#25340#38899#21152#21152
      KeyField = #31185#30446
      ListField = #31185#30446
      ListSource = DataSource3
      TabOrder = 1
    end
    object ComboBox1: TComboBox
      Left = 80
      Top = 88
      Width = 121
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#25340#38899#21152#21152
      ItemHeight = 13
      TabOrder = 2
      Items.Strings = (
        '='
        '>'
        '<'
        '>='
        '<=')
    end
    object Button1: TButton
      Left = 216
      Top = 16
      Width = 81
      Height = 41
      Caption = #24320#22987#26597#35810
      TabOrder = 3
      OnClick = Button1Click
    end
    object Edit1: TEdit
      Left = 80
      Top = 120
      Width = 121
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#25340#38899#21152#21152
      TabOrder = 4
    end
    object Button2: TButton
      Left = 216
      Top = 64
      Width = 81
      Height = 41
      Caption = #25253#34920#39044#35272
      TabOrder = 5
      OnClick = Button2Click
    end
    object Button5: TButton
      Left = 216
      Top = 112
      Width = 81
      Height = 41
      Caption = #25171#21360#25253#34920
      TabOrder = 6
      OnClick = Button5Click
    end
  end
  object GroupBox2: TGroupBox
    Left = 312
    Top = 0
    Width = 313
    Height = 169
    Caption = #35745#31639#24179#22343#20998
    TabOrder = 3
    object Label3: TLabel
      Left = 32
      Top = 24
      Width = 3
      Height = 13
    end
    object Label4: TLabel
      Left = 16
      Top = 48
      Width = 73
      Height = 13
      Caption = #35831#36873#25321#29677#32423
    end
    object Label5: TLabel
      Left = 16
      Top = 72
      Width = 81
      Height = 13
      Caption = #35831#36755#20837#23398#21495
    end
    object Label9: TLabel
      Left = 16
      Top = 24
      Width = 73
      Height = 13
      Caption = #35831#36873#25321#31185#30446
    end
    object Label10: TLabel
      Left = 16
      Top = 96
      Width = 81
      Height = 13
      Caption = #35831#36755#20837#22995#21517
    end
    object Edit2: TEdit
      Left = 104
      Top = 72
      Width = 121
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#25340#38899#21152#21152
      TabOrder = 0
    end
    object DBLookupComboBox3: TDBLookupComboBox
      Left = 104
      Top = 24
      Width = 121
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#25340#38899#21152#21152
      KeyField = #31185#30446
      ListField = #31185#30446
      ListSource = DataSource3
      TabOrder = 1
    end
    object DBLookupComboBox4: TDBLookupComboBox
      Left = 104
      Top = 48
      Width = 121
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#25340#38899#21152#21152
      KeyField = #29677#32423
      ListField = #29677#32423
      ListSource = DataSource2
      TabOrder = 2
    end
    object Button4: TButton
      Left = 232
      Top = 32
      Width = 75
      Height = 73
      Caption = #24320#22987#35745#31639
      TabOrder = 3
      OnClick = Button4Click
    end
    object Edit3: TEdit
      Left = 104
      Top = 96
      Width = 121
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#25340#38899#21152#21152
      TabOrder = 4
    end
  end
  object Memo1: TMemo
    Left = 320
    Top = 200
    Width = 185
    Height = 209
    ImeName = #20013#25991' ('#31616#20307') - '#25340#38899#21152#21152
    TabOrder = 4
  end
  object Query1: TQuery
    DatabaseName = 'db\'
    Left = 200
  end
  object DataSource1: TDataSource
    DataSet = Query1
    Left = 200
    Top = 40
  end
  object Query2: TQuery
    Active = True
    DatabaseName = 'db\'
    SQL.Strings = (
      'select distinct '#29677#32423' from student.db')
    Left = 248
    Top = 248
  end
  object Query3: TQuery
    Active = True
    DatabaseName = 'db\'
    SQL.Strings = (
      'select distinct '#31185#30446' from student.db')
    Left = 216
    Top = 288
  end
  object DataSource2: TDataSource
    DataSet = Query2
    Left = 216
    Top = 248
  end
  object DataSource3: TDataSource
    DataSet = Query3
    Left = 256
    Top = 296
  end
  object Query4: TQuery
    DatabaseName = 'db\'
    Left = 448
    Top = 65528
  end
end