unit1.dfm

学生成绩管理系统

object studentmanage: Tstudentmanage
  Left = 148
  Top = 107
  Width = 544
  Height = 375
  Caption = #23398#29983#31649#29702
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDesktopCenter
  Visible = True
  OnClose = FormClose
  PixelsPerInch = 96
  TextHeight = 13
  object panel2: TPanel
    Left = 0
    Top = 192
    Width = 536
    Height = 156
    Align = alClient
    TabOrder = 0
    object DBGrid1: TDBGrid
      Left = 1
      Top = 1
      Width = 534
      Height = 154
      Align = alClient
      DataSource = DataSource1
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'StudentId'
          Title.Caption = #23398#29983#32534#21495
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Name'
          Title.Caption = #22995#21517
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Sex'
          Title.Caption = #24615#21035
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Age'
          Title.Caption = #24180#40836
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Class'
          Title.Caption = #29677#32423
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Department'
          Title.Caption = #31995#21035
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Address'
          Title.Caption = #20303#22336
          Visible = True
        end>
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 536
    Height = 192
    Align = alTop
    BevelOuter = bvNone
    TabOrder = 1
    object Label1: TLabel
      Left = 10
      Top = 12
      Width = 60
      Height = 13
      Caption = #23398#29983#32534#21495#65306
    end
    object Label2: TLabel
      Left = 16
      Top = 52
      Width = 36
      Height = 13
      Caption = #22995#21517#65306
    end
    object Label3: TLabel
      Left = 16
      Top = 92
      Width = 36
      Height = 13
      Caption = #24615#21035#65306
    end
    object Label4: TLabel
      Left = 216
      Top = 12
      Width = 36
      Height = 13
      Caption = #24180#40836#65306
    end
    object Label5: TLabel
      Left = 216
      Top = 52
      Width = 36
      Height = 13
      Caption = #29677#32423#65306
    end
    object Label6: TLabel
      Left = 216
      Top = 92
      Width = 36
      Height = 13
      Caption = #31995#21035#65306
    end
    object Label7: TLabel
      Left = 8
      Top = 140
      Width = 60
      Height = 13
      Caption = #23478#24237#20303#22336#65306
    end
    object DBEdit1: TDBEdit
      Left = 64
      Top = 8
      Width = 121
      Height = 21
      DataField = 'StudentId'
      DataSource = DataSource1
      ReadOnly = True
      TabOrder = 0
    end
    object DBEdit2: TDBEdit
      Left = 63
      Top = 47
      Width = 121
      Height = 21
      DataField = 'Name'
      DataSource = DataSource1
      ReadOnly = True
      TabOrder = 1
    end
    object DBEdit4: TDBEdit
      Left = 264
      Top = 8
      Width = 121
      Height = 21
      DataField = 'Age'
      DataSource = DataSource1
      ReadOnly = True
      TabOrder = 2
    end
    object DBEdit5: TDBEdit
      Left = 264
      Top = 48
      Width = 121
      Height = 21
      DataField = 'Class'
      DataSource = DataSource1
      ReadOnly = True
      TabOrder = 3
    end
    object DBEdit7: TDBEdit
      Left = 64
      Top = 136
      Width = 121
      Height = 21
      DataField = 'Address'
      DataSource = DataSource1
      ReadOnly = True
      TabOrder = 4
    end
    object Panel3: TPanel
      Left = 189
      Top = 128
      Width = 353
      Height = 49
      BevelOuter = bvNone
      TabOrder = 5
      object SpeedButton1: TSpeedButton
        Left = 7
        Top = 7
        Width = 51
        Height = 27
        Caption = #28155#21152
        Flat = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clGreen
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        OnClick = SpeedButton1Click
      end
      object SpeedButton2: TSpeedButton
        Left = 71
        Top = 7
        Width = 51
        Height = 27
        Caption = #20462#25913
        Flat = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clGreen
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        OnClick = SpeedButton2Click
      end
      object SpeedButton3: TSpeedButton
        Left = 127
        Top = 7
        Width = 51
        Height = 27
        Caption = #20445#23384
        Enabled = False
        Flat = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clGreen
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        OnClick = SpeedButton3Click
      end
      object SpeedButton4: TSpeedButton
        Left = 183
        Top = 7
        Width = 51
        Height = 27
        Caption = #21024#38500
        Flat = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clGreen
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        OnClick = SpeedButton4Click
      end
      object SpeedButton5: TSpeedButton
        Left = 239
        Top = 7
        Width = 51
        Height = 27
        Caption = #25764#28040
        Flat = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clGreen
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        OnClick = SpeedButton5Click
      end
      object SpeedButton6: TSpeedButton
        Left = 295
        Top = 7
        Width = 51
        Height = 27
        Caption = #20851#38381
        Flat = True
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clGreen
        Font.Height = -16
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        OnClick = SpeedButton6Click
      end
    end
    object DBComboBox1: TDBComboBox
      Left = 64
      Top = 88
      Width = 121
      Height = 21
      DataField = 'Sex'
      DataSource = DataSource1
      ItemHeight = 13
      Items.Strings = (
        #30007
        #22899)
      ReadOnly = True
      TabOrder = 6
    end
    object DBComboBox2: TDBComboBox
      Left = 264
      Top = 89
      Width = 121
      Height = 21
      DataField = 'Department'
      DataSource = DataSource1
      ItemHeight = 13
      Items.Strings = (
        #35745#31639#26426#24212#29992
        #35745#31639#26426#20449#24687#31649#29702
        #20154#25991#31038#31185#31995
        #26426#30005#19968#20307#21270
        #21307#23398
        #35745#31639#26426#25216#26415#19982#31185#23398
        #22270#20070#39302)
      ReadOnly = True
      TabOrder = 7
    end
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 504
    Top = 16
  end
  object Table1: TTable
    Active = True
    TableName = 'datebase\student.db'
    Left = 488
    Top = 55
  end
end