unit4.~dfm

Delphi 课程设计里面拥有学生管理系统

object Form4: TForm4
  Left = 126
  Top = 104
  Width = 606
  Height = 395
  Caption = #33322#29677#26102#21051#34920#26597#35810#31383#20307
  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 Label1: TLabel
    Left = 120
    Top = 16
    Width = 330
    Height = 30
    Caption = #37995#35802#33322#31354#20844#21496#33322#29677#26102#21051#34920
    Font.Charset = GB2312_CHARSET
    Font.Color = clAqua
    Font.Height = -29
    Font.Name = #21326#25991#34892#26999
    Font.Style = [fsBold, fsUnderline]
    ParentFont = False
  end
  object SpeedButton1: TSpeedButton
    Left = 24
    Top = 248
    Width = 105
    Height = 89
    Caption = #26597#35810#26041#24335
    Flat = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      33333FF3333333333333447333333333333377FFF33333333333744473333333
      333337773FF3333333333444447333333333373F773FF3333333334444447333
      33333373F3773FF3333333744444447333333337F333773FF333333444444444
      733333373F3333773FF333334444444444733FFF7FFFFFFF77FF999999999999
      999977777777777733773333CCCCCCCCCC3333337333333F7733333CCCCCCCCC
      33333337F3333F773333333CCCCCCC3333333337333F7733333333CCCCCC3333
      333333733F77333333333CCCCC333333333337FF7733333333333CCC33333333
      33333777333333333333CC333333333333337733333333333333}
    Layout = blGlyphTop
    NumGlyphs = 2
    ParentFont = False
  end
  object SpeedButton2: TSpeedButton
    Left = 448
    Top = 248
    Width = 105
    Height = 89
    Caption = #25191#34892#26597#35810
    Flat = True
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -14
    Font.Name = #23435#20307
    Font.Style = []
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      333333333333333333FF3333333333333744333333333333F773333333333337
      44473333333333F777F3333333333744444333333333F7733733333333374444
      4433333333F77333733333333744444447333333F7733337F333333744444444
      433333F77333333733333744444444443333377FFFFFFF7FFFFF999999999999
      9999733777777777777333CCCCCCCCCC33333773FF333373F3333333CCCCCCCC
      C333333773FF3337F333333333CCCCCCC33333333773FF373F3333333333CCCC
      CC333333333773FF73F33333333333CCCCC3333333333773F7F3333333333333
      CCC333333333333777FF33333333333333CC3333333333333773}
    Layout = blGlyphTop
    NumGlyphs = 2
    ParentFont = False
    OnClick = SpeedButton2Click
  end
  object Label2: TLabel
    Left = 168
    Top = 322
    Width = 72
    Height = 12
    Caption = #36755#20837#26597#35810#20869#23481
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
  end
  object DBGrid1: TDBGrid
    Left = 24
    Top = 64
    Width = 553
    Height = 161
    DataSource = DataSource1
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
    ParentFont = False
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = #33322#29677#21495
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = #21457#20986#22478#24066
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = #21040#36798#22478#24066
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = #36215#39134#26102#38388
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = #21040#36798#26102#38388
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Visible = True
      end
      item
        Expanded = False
        FieldName = #25152#23646#20844#21496
        Title.Font.Charset = GB2312_CHARSET
        Title.Font.Color = clWindowText
        Title.Font.Height = -12
        Title.Font.Name = #23435#20307
        Title.Font.Style = []
        Visible = True
      end>
  end
  object RadioButton1: TRadioButton
    Left = 161
    Top = 247
    Width = 113
    Height = 17
    Caption = #25353#33322#29677#21495#26597#35810
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 1
    OnClick = RadioButton1Click
  end
  object RadioButton2: TRadioButton
    Left = 161
    Top = 271
    Width = 113
    Height = 17
    Caption = #25353#21457#20986#22478#24066#26597#35810
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 2
    OnClick = RadioButton2Click
  end
  object RadioButton3: TRadioButton
    Left = 162
    Top = 296
    Width = 113
    Height = 17
    Caption = #25353#21040#36798#22478#24066#26597#35810
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    OnClick = RadioButton3Click
  end
  object RadioButton4: TRadioButton
    Left = 305
    Top = 247
    Width = 113
    Height = 17
    Caption = #25353#36215#39134#26102#38388#26597#35810
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 4
    OnClick = RadioButton4Click
  end
  object RadioButton5: TRadioButton
    Left = 305
    Top = 271
    Width = 113
    Height = 17
    Caption = #25353#21040#36798#26102#38388#26597#35810
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 5
    OnClick = RadioButton5Click
  end
  object RadioButton6: TRadioButton
    Left = 305
    Top = 295
    Width = 113
    Height = 17
    Caption = #25353#25152#23646#20844#21496#26597#35810
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ParentFont = False
    TabOrder = 6
    OnClick = RadioButton6Click
  end
  object Memo1: TMemo
    Left = 136
    Top = 112
    Width = 385
    Height = 81
    ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
    Lines.Strings = (
      'Memo1')
    TabOrder = 7
    Visible = False
  end
  object Edit1: TEdit
    Left = 286
    Top = 318
    Width = 121
    Height = 20
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = []
    ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
    ParentFont = False
    TabOrder = 8
    Text = 'Edit1'
  end
  object Table1: TTable
    Active = True
    TableName = #39134#34892#26102#21051#34920'.db'
    Left = 496
    Top = 56
    object Table1BDEDesigner: TStringField
      FieldName = #33322#29677#21495
      Size = 18
    end
    object Table1BDEDesigner2: TStringField
      FieldName = #21457#20986#22478#24066
    end
    object Table1BDEDesigner3: TStringField
      FieldName = #21040#36798#22478#24066
    end
    object Table1BDEDesigner4: TStringField
      FieldName = #36215#39134#26102#38388
    end
    object Table1BDEDesigner5: TStringField
      FieldName = #21040#36798#26102#38388
    end
    object Table1BDEDesigner6: TStringField
      FieldName = #25152#23646#20844#21496
    end
  end
  object DataSource1: TDataSource
    DataSet = Table1
    Left = 488
    Top = 96
  end
end