uadd.~dfm

本程序是人事管理系统.对数据进行的操作有数据更新数据查询数据删除.本程序利用DataModuleado操作数据库,通过ado+Sqlserver数据库达成人事系统的建立.

object frmAdd: TfrmAdd
  Left = 282
  Top = 89
  Width = 250
  Height = 457
  Caption = 'frmAdd'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poDefault
  Visible = True
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Label2: TLabel
    Left = 8
    Top = 16
    Width = 80
    Height = 13
    Alignment = taRightJustify
    AutoSize = False
    Caption = #21592#24037#21495#65306
  end
  object Label3: TLabel
    Left = 8
    Top = 40
    Width = 80
    Height = 13
    Alignment = taRightJustify
    AutoSize = False
    Caption = #23494#12288#30721#65306
  end
  object Label1: TLabel
    Left = 8
    Top = 64
    Width = 80
    Height = 13
    Alignment = taRightJustify
    AutoSize = False
    Caption = #22995#12288#21517#65306
  end
  object Label5: TLabel
    Left = 8
    Top = 136
    Width = 80
    Height = 13
    Alignment = taRightJustify
    AutoSize = False
    Caption = #29983#12288#26085#65306
  end
  object Label6: TLabel
    Left = 8
    Top = 160
    Width = 80
    Height = 13
    Alignment = taRightJustify
    AutoSize = False
    Caption = #37096#12288#38376#65306
  end
  object Label7: TLabel
    Left = 8
    Top = 184
    Width = 80
    Height = 13
    Alignment = taRightJustify
    AutoSize = False
    Caption = #32844#12288#21153#65306
  end
  object Label9: TLabel
    Left = 8
    Top = 208
    Width = 80
    Height = 13
    Alignment = taRightJustify
    AutoSize = False
    Caption = #21463#25945#32946#27700#24179#65306
  end
  object Label10: TLabel
    Left = 8
    Top = 232
    Width = 80
    Height = 13
    Alignment = taRightJustify
    AutoSize = False
    Caption = #19987#12288#19994#65306
  end
  object Label11: TLabel
    Left = 8
    Top = 256
    Width = 80
    Height = 13
    Alignment = taRightJustify
    AutoSize = False
    Caption = #20303#12288#22336#65306
  end
  object Label12: TLabel
    Left = 8
    Top = 280
    Width = 80
    Height = 13
    Alignment = taRightJustify
    AutoSize = False
    Caption = #30005#12288#35805#65306
  end
  object Label13: TLabel
    Left = 8
    Top = 304
    Width = 80
    Height = 13
    Alignment = taRightJustify
    AutoSize = False
    Caption = 'E-mail'#65306
  end
  object Label14: TLabel
    Left = 8
    Top = 328
    Width = 80
    Height = 13
    Alignment = taRightJustify
    AutoSize = False
    Caption = #22791#12288#27880#65306
  end
  object drgSex: TDBRadioGroup
    Left = 32
    Top = 88
    Width = 201
    Height = 33
    BiDiMode = bdLeftToRight
    Caption = #24615#12288#21035
    Columns = 2
    DataField = 'SEX'
    DataSource = DataModule1.DS_add_user
    Items.Strings = (
      #30007
      #22899)
    ParentBiDiMode = False
    TabOrder = 0
    TabStop = True
    Values.Strings = (
      'M'
      'F')
  end
  object edtPasswd: TEdit
    Left = 88
    Top = 36
    Width = 145
    Height = 21
    TabStop = False
    Color = clSilver
    ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
    ReadOnly = True
    TabOrder = 1
  end
  object deId: TDBEdit
    Left = 88
    Top = 12
    Width = 145
    Height = 21
    TabStop = False
    Color = clSilver
    DataField = 'ID'
    DataSource = DataModule1.DS_add_user
    ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
    ReadOnly = True
    TabOrder = 2
  end
  object deName: TDBEdit
    Left = 88
    Top = 60
    Width = 145
    Height = 21
    DataField = 'NAME'
    DataSource = DataModule1.DS_add_user
    ImeMode = imChinese
    ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
    TabOrder = 3
  end
  object edtBirthday: TDBEdit
    Left = 88
    Top = 124
    Width = 145
    Height = 21
    DataField = 'BIRTHDAY'
    DataSource = DataModule1.DS_add_user
    ImeMode = imAlpha
    ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
    TabOrder = 4
  end
  object dlucDept: TDBLookupComboBox
    Left = 88
    Top = 148
    Width = 145
    Height = 21
    DataField = 'DEPARTMENT'
    DataSource = DataModule1.DS_add_user
    ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
    KeyField = 'ID'
    ListField = 'NAME'
    ListSource = DataModule1.DS_department
    TabOrder = 5
  end
  object dlucJob: TDBLookupComboBox
    Left = 88
    Top = 172
    Width = 145
    Height = 21
    DataField = 'JOB'
    DataSource = DataModule1.DS_add_user
    ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
    KeyField = 'CODE'
    ListField = 'DESCRIPTION'
    ListSource = DataModule1.DS_job
    TabOrder = 6
  end
  object dlucEdu_level: TDBLookupComboBox
    Left = 88
    Top = 196
    Width = 145
    Height = 21
    DataField = 'EDU_LEVEL'
    DataSource = DataModule1.DS_add_user
    ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
    KeyField = 'CODE'
    ListField = 'DESCRIPTION'
    ListSource = DataModule1.DS_edu_level
    TabOrder = 7
  end
  object deSpecialty: TDBEdit
    Left = 88
    Top = 220
    Width = 145
    Height = 21
    DataField = 'SPECIALTY'
    DataSource = DataModule1.DS_add_user
    ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
    TabOrder = 8
  end
  object deAddress: TDBEdit
    Left = 88
    Top = 244
    Width = 145
    Height = 21
    DataField = 'ADDRESS'
    DataSource = DataModule1.DS_add_user
    ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
    TabOrder = 9
  end
  object deTel: TDBEdit
    Left = 88
    Top = 268
    Width = 145
    Height = 21
    DataField = 'TEL'
    DataSource = DataModule1.DS_add_user
    ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
    TabOrder = 10
  end
  object deEmail: TDBEdit
    Left = 88
    Top = 292
    Width = 145
    Height = 21
    DataField = 'EMAIL'
    DataSource = DataModule1.DS_add_user
    ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
    TabOrder = 11
  end
  object dmRemark: TDBMemo
    Left = 32
    Top = 344
    Width = 201
    Height = 49
    DataField = 'REMARK'
    DataSource = DataModule1.DS_add_user
    ImeName = #20013#25991' ('#31616#20307') - '#20840#25340
    TabOrder = 12
  end
  object Button2: TButton
    Left = 160
    Top = 400
    Width = 75
    Height = 25
    Caption = #22686#21152
    Default = True
    TabOrder = 13
    OnClick = Button1Click
  end
end