ustudentedit.dfm

来自「一.录入学生信息（预计有81个学生」· DFM 代码 · 共 267 行

object frmStudentEdit: TfrmStudentEdit
  Left = 307
  Top = 158
  ActiveControl = EditSName
  BorderStyle = bsDialog
  Caption = #26032#22686'/'#20462#25913#23398#29983#36164#26009
  ClientHeight = 199
  ClientWidth = 430
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = #23435#20307
  Font.Style = []
  KeyPreview = True
  OldCreateOrder = False
  Position = poScreenCenter
  OnCreate = FormCreate
  OnKeyDown = FormKeyDown
  PixelsPerInch = 96
  TextHeight = 12
  object Label1: TLabel
    Left = 8
    Top = 8
    Width = 48
    Height = 12
    Caption = #29677#32423#31616#30721
  end
  object Label2: TLabel
    Left = 32
    Top = 33
    Width = 24
    Height = 12
    Caption = #22995#21517
  end
  object Label3: TLabel
    Left = 168
    Top = 33
    Width = 24
    Height = 12
    Caption = #23398#21495
  end
  object Label4: TLabel
    Left = 295
    Top = 33
    Width = 36
    Height = 12
    Caption = #23517#23460#21495
  end
  object Label5: TLabel
    Left = 8
    Top = 59
    Width = 48
    Height = 12
    Caption = #23478#24237#22320#22336
  end
  object Label6: TLabel
    Left = 307
    Top = 59
    Width = 24
    Height = 12
    Caption = #37038#32534
  end
  object Label7: TLabel
    Left = 32
    Top = 84
    Width = 24
    Height = 12
    Caption = #23478#38271
  end
  object Label8: TLabel
    Left = 144
    Top = 84
    Width = 48
    Height = 12
    Caption = #23478#38271#30005#35805
  end
  object Label9: TLabel
    Left = 283
    Top = 84
    Width = 48
    Height = 12
    Caption = #26159#21542#22242#21592
  end
  object Label10: TLabel
    Left = 8
    Top = 110
    Width = 48
    Height = 12
    Caption = #26159#21542#36829#32426
  end
  object Label11: TLabel
    Left = 144
    Top = 110
    Width = 48
    Height = 12
    Caption = #36829#32426#35828#26126
  end
  object Label12: TLabel
    Left = 8
    Top = 136
    Width = 48
    Height = 12
    Caption = #26159#21542#22312#26657
  end
  object Label13: TLabel
    Left = 144
    Top = 8
    Width = 48
    Height = 12
    Caption = #29677#32423#21517#31216
  end
  object Panel1: TPanel
    Left = 0
    Top = 158
    Width = 430
    Height = 41
    Align = alBottom
    BevelOuter = bvLowered
    Ctl3D = True
    ParentCtl3D = False
    TabOrder = 0
    DesignSize = (
      430
      41)
    object cmdEnsure: TButton
      Left = 238
      Top = 9
      Width = 72
      Height = 22
      Anchors = [akTop, akRight]
      Caption = #30830#35748'(&E)'
      TabOrder = 0
      OnClick = cmdEnsureClick
    end
    object cmdCancel: TButton
      Left = 318
      Top = 9
      Width = 72
      Height = 22
      Anchors = [akTop, akRight]
      Cancel = True
      Caption = #21462#28040'(&X)'
      TabOrder = 1
      OnClick = cmdCancelClick
    end
  end
  object EditClassCode: TEdit
    Left = 59
    Top = 3
    Width = 81
    Height = 20
    Color = clInfoBk
    Enabled = False
    TabOrder = 1
  end
  object EditClassName: TEdit
    Left = 195
    Top = 3
    Width = 226
    Height = 20
    Color = clInfoBk
    Enabled = False
    TabOrder = 2
  end
  object EditSName: TEdit
    Left = 59
    Top = 28
    Width = 81
    Height = 20
    TabOrder = 3
  end
  object EditSCode: TEdit
    Left = 195
    Top = 28
    Width = 81
    Height = 20
    TabOrder = 4
    Text = '0'
    OnKeyPress = EditSCodeKeyPress
  end
  object EditRoom: TEdit
    Left = 339
    Top = 28
    Width = 81
    Height = 20
    TabOrder = 5
  end
  object EditAddress: TEdit
    Left = 59
    Top = 54
    Width = 219
    Height = 20
    TabOrder = 6
  end
  object EditPostCode: TEdit
    Left = 339
    Top = 54
    Width = 81
    Height = 20
    TabOrder = 7
  end
  object EditPatriarchy: TEdit
    Left = 59
    Top = 80
    Width = 81
    Height = 20
    TabOrder = 8
  end
  object EditHomeTel: TEdit
    Left = 195
    Top = 80
    Width = 81
    Height = 20
    TabOrder = 9
  end
  object cmbIsTY: TComboBox
    Left = 338
    Top = 79
    Width = 83
    Height = 20
    Style = csDropDownList
    ItemHeight = 12
    TabOrder = 10
    Items.Strings = (
      #21542
      #26159)
  end
  object cmbHasWJ: TComboBox
    Left = 59
    Top = 106
    Width = 83
    Height = 20
    Style = csDropDownList
    ItemHeight = 12
    TabOrder = 11
    Items.Strings = (
      #26080
      #26377)
  end
  object cmbIsActive: TComboBox
    Left = 59
    Top = 132
    Width = 83
    Height = 20
    Style = csDropDownList
    ItemHeight = 12
    TabOrder = 12
    Items.Strings = (
      #21542
      #22312#26657)
  end
  object EditWJContent: TMemo
    Left = 195
    Top = 105
    Width = 226
    Height = 47
    TabOrder = 13
  end
  object dsQuery: TADODataSet
    Connection = DM.ADOLocal
    Parameters = <>
    Left = 16
    Top = 160
  end
end