addstuunit.dfm

学生信息管理系统

      Height = 16
      Caption = #20837#23398#26085#26399
    end
    object Name: TLabeledEdit
      Left = 56
      Top = 24
      Width = 57
      Height = 22
      EditLabel.Width = 34
      EditLabel.Height = 16
      EditLabel.Caption = #22995#21517'    '
      LabelPosition = lpLeft
      LabelSpacing = 3
      TabOrder = 0
      Text = #22047#22047
    end
    object StuNum: TLabeledEdit
      Left = 120
      Top = 112
      Width = 73
      Height = 22
      EditLabel.Width = 28
      EditLabel.Height = 16
      EditLabel.Caption = #23398#21495'  '
      LabelPosition = lpLeft
      LabelSpacing = 3
      TabOrder = 1
      Text = '5060309000'
    end
    object IdNum: TLabeledEdit
      Left = 56
      Top = 56
      Width = 129
      Height = 22
      EditLabel.Width = 44
      EditLabel.Height = 16
      EditLabel.Caption = #36523#20221#35777#21495
      LabelPosition = lpLeft
      LabelSpacing = 3
      TabOrder = 2
      Text = '000000000000000000'
    end
    object People: TLabeledEdit
      Left = 144
      Top = 24
      Width = 41
      Height = 22
      EditLabel.Width = 22
      EditLabel.Height = 16
      EditLabel.Caption = #27665#26063
      LabelPosition = lpLeft
      LabelSpacing = 3
      TabOrder = 3
      Text = #27721
    end
    object Sex: TRadioGroup
      Left = 24
      Top = 88
      Width = 57
      Height = 65
      Caption = #24615#21035
      Items.Strings = (
        #30007
        #22899)
      TabOrder = 4
    end
    object DateTimePicker1: TDateTimePicker
      Left = 56
      Top = 160
      Width = 137
      Height = 24
      CalAlignment = dtaLeft
      Date = 39180.9585203241
      Time = 39180.9585203241
      DateFormat = dfLong
      DateMode = dmComboBox
      Kind = dtkDate
      ParseInput = False
      TabOrder = 5
    end
  end
  object StuInfo: TGroupBox
    Left = 32
    Top = 232
    Width = 241
    Height = 177
    Anchors = [akLeft, akTop, akBottom]
    Caption = #22312#26657#20449#24687
    Ctl3D = False
    ParentCtl3D = False
    TabOrder = 1
    object LabelSchool: TLabel
      Left = 8
      Top = 24
      Width = 22
      Height = 16
      Caption = #23398#38498
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = #24494#36719#38597#40657
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 8
      Top = 104
      Width = 22
      Height = 16
      Caption = #29677#32423
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = #24494#36719#38597#40657
      Font.Style = []
      ParentFont = False
    end
    object Label1: TLabel
      Left = 8
      Top = 64
      Width = 22
      Height = 16
      Caption = #19987#19994
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = #24494#36719#38597#40657
      Font.Style = []
      ParentFont = False
    end
    object Dormitory: TLabeledEdit
      Left = 48
      Top = 144
      Width = 41
      Height = 22
      EditLabel.Width = 36
      EditLabel.Height = 16
      EditLabel.Caption = #23517#23460#27004' '
      LabelPosition = lpLeft
      LabelSpacing = 3
      ReadOnly = True
      TabOrder = 0
      Text = 'D26'
    end
    object LabeledEdit1: TLabeledEdit
      Left = 152
      Top = 144
      Width = 41
      Height = 22
      EditLabel.Width = 28
      EditLabel.Height = 16
      EditLabel.Caption = #23517#23460'  '
      LabelPosition = lpLeft
      LabelSpacing = 3
      ReadOnly = True
      TabOrder = 1
      Text = '500'
    end
    object SchoolList: TListBox
      Left = 48
      Top = 16
      Width = 177
      Height = 33
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = #24494#36719#38597#40657
      Font.Style = []
      ItemHeight = 16
      Items.Strings = (
        #30005#23376#20449#24687#19982#30005#27668#24037#31243#23398#38498
        #36719#20214#23398#38498
        #26426#26800#23398#38498)
      ParentFont = False
      TabOrder = 2
    end
    object ClassList: TComboBox
      Left = 48
      Top = 104
      Width = 177
      Height = 24
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = #24494#36719#38597#40657
      Font.Style = []
      ItemHeight = 16
      ParentFont = False
      TabOrder = 3
      Text = #35831#36873#25321#29677#32423
      Items.Strings = (
        'F0603033'
        'F0603032')
    end
    object Major: TListBox
      Left = 48
      Top = 56
      Width = 177
      Height = 33
      ItemHeight = 16
      TabOrder = 4
    end
  end
  object Confirm: TBitBtn
    Left = 56
    Top = 432
    Width = 75
    Height = 25
    Caption = #25552#20132
    TabOrder = 2
    OnClick = ConfirmClick
    Kind = bkOK
  end
  object Cancel: TBitBtn
    Left = 160
    Top = 432
    Width = 75
    Height = 25
    Caption = #25918#24323
    TabOrder = 3
    OnClick = CancelClick
    Kind = bkAbort
  end
end