unit3.dfm

以前在某高校做外聘教师时做的学生学籍管理系统(delphi+access)。献丑献丑

object Form3: TForm3
  Left = 185
  Top = 104
  Width = 800
  Height = 600
  Caption = #26465#20214#26597#35810
  Color = clMoneyGreen
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  KeyPreview = True
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  WindowState = wsMaximized
  OnClose = FormClose
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  OnMouseMove = FormMouseMove
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 0
    Top = 273
    Width = 792
    Height = 275
    Align = alClient
    Caption = #26597#35810#32467#26524#26174#31034
    Color = 16635349
    ParentColor = False
    TabOrder = 1
    object DBGrid1: TDBGrid
      Left = 2
      Top = 15
      Width = 788
      Height = 258
      Align = alClient
      Color = clInfoBk
      DataSource = dm.DataSource2
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
    end
  end
  object GroupBox2: TGroupBox
    Left = 0
    Top = 0
    Width = 792
    Height = 273
    Align = alTop
    Caption = #26597#35810#32452#21512#26465#20214
    Color = 16103203
    Ctl3D = False
    ParentColor = False
    ParentCtl3D = False
    TabOrder = 0
    object Label1: TLabel
      Left = 29
      Top = 56
      Width = 41
      Height = 13
      AutoSize = False
      Caption = #22995'  '#21517
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 29
      Top = 24
      Width = 41
      Height = 13
      AutoSize = False
      Caption = #23398'  '#21495
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 29
      Top = 88
      Width = 41
      Height = 13
      AutoSize = False
      Caption = #24615'  '#21035
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 25
      Top = 176
      Width = 54
      Height = 13
      AutoSize = False
      Caption = #25919#27835#38754#35980
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 229
      Top = 56
      Width = 51
      Height = 13
      AutoSize = False
      Caption = #25152#23646#20998#38498
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label6: TLabel
      Left = 229
      Top = 24
      Width = 49
      Height = 13
      AutoSize = False
      Caption = #19987'   '#19994
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label7: TLabel
      Left = 29
      Top = 208
      Width = 45
      Height = 13
      AutoSize = False
      Caption = #31821'  '#36143
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label8: TLabel
      Left = 439
      Top = 56
      Width = 57
      Height = 13
      AutoSize = False
      Caption = #30005#35805#21495#30721
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label9: TLabel
      Left = 23
      Top = 120
      Width = 65
      Height = 13
      Caption = #20986#29983#24180#26376#26085
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label10: TLabel
      Left = 23
      Top = 144
      Width = 65
      Height = 13
      Caption = #36523#20221#35777#21495#30721
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label11: TLabel
      Left = 229
      Top = 88
      Width = 47
      Height = 13
      Caption = #23398'   '#21382
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label12: TLabel
      Left = 30
      Top = 234
      Width = 36
      Height = 13
      Caption = #27665'    '#26063
    end
    object Label13: TLabel
      Left = 229
      Top = 193
      Width = 52
      Height = 13
      Caption = #23478#24237#22320#22336
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label14: TLabel
      Left = 439
      Top = 24
      Width = 52
      Height = 13
      Caption = #23478#24237#37038#32534
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label17: TLabel
      Left = 229
      Top = 124
      Width = 52
      Height = 13
      Caption = #20837#23398#26102#38388
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label18: TLabel
      Left = 229
      Top = 160
      Width = 47
      Height = 13
      Caption = #23398'   '#21046
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label19: TLabel
      Left = 439
      Top = 88
      Width = 52
      Height = 13
      Caption = #20852#36259#29233#22909
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label20: TLabel
      Left = 444
      Top = 120
      Width = 46
      Height = 13
      Caption = #25193#23637#39033'1'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label21: TLabel
      Left = 444
      Top = 160
      Width = 46
      Height = 13
      Caption = #25193#23637#39033'2'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label22: TLabel
      Left = 444
      Top = 192
      Width = 46
      Height = 13
      Caption = #25193#23637#39033'3'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Label23: TLabel
      Left = 637
      Top = 24
      Width = 26
      Height = 13
      Caption = #22791#27880
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object Edit1: TEdit
      Left = 94
      Top = 52
      Width = 100
      Height = 19
      Color = clInfoBk
      Font.Charset = ANSI_CHARSET
      Font.Color = 12615680
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 1
    end
    object Edit2: TEdit
      Left = 94
      Top = 21
      Width = 100
      Height = 19
      Color = clInfoBk
      Font.Charset = ANSI_CHARSET
      Font.Color = 12615680
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 0
    end
    object ComboBox1: TComboBox
      Left = 94
      Top = 84
      Width = 100
      Height = 21
      Color = clInfoBk
      Font.Charset = ANSI_CHARSET