ustainfo.dfm

此为一个用delphi语言编写的人事管理系统

          Height = 28
          DataField = 'name'
          DataSource = dst
          TabOrder = 1
        end
        object dedtbirth: TDBEdit
          Left = 68
          Top = 94
          Width = 120
          Height = 28
          DataField = 'birth'
          DataSource = dst
          TabOrder = 3
        end
        object dedtsorts: TDBEdit
          Left = 68
          Top = 146
          Width = 120
          Height = 28
          DataField = 'sorts'
          DataSource = dst
          TabOrder = 5
        end
        object dedtduty: TDBEdit
          Left = 68
          Top = 174
          Width = 120
          Height = 28
          DataField = 'duty'
          DataSource = dst
          TabOrder = 6
        end
        object dedtprovi: TDBEdit
          Left = 68
          Top = 203
          Width = 120
          Height = 28
          DataField = 'provi'
          DataSource = dst
          TabOrder = 7
        end
        object dedtfolk: TDBEdit
          Left = 68
          Top = 232
          Width = 120
          Height = 28
          DataField = 'folk'
          DataSource = dst
          TabOrder = 8
        end
        object dedtspecial: TDBEdit
          Left = 68
          Top = 283
          Width = 120
          Height = 28
          DataField = 'special'
          DataSource = dst
          TabOrder = 10
        end
        object dedtcardno: TDBEdit
          Left = 320
          Top = 17
          Width = 262
          Height = 28
          DataField = 'cardno'
          DataSource = dst
          TabOrder = 11
        end
        object dedtrecno: TDBEdit
          Left = 320
          Top = 44
          Width = 262
          Height = 28
          DataField = 'recno'
          DataSource = dst
          TabOrder = 12
        end
        object dedtpolitics: TDBEdit
          Left = 320
          Top = 71
          Width = 129
          Height = 28
          DataField = 'politics'
          DataSource = dst
          TabOrder = 13
        end
        object dedtslevel: TDBEdit
          Left = 320
          Top = 98
          Width = 129
          Height = 28
          DataField = 'slevel'
          DataSource = dst
          TabOrder = 14
        end
        object dedtindate: TDBEdit
          Left = 320
          Top = 147
          Width = 129
          Height = 28
          DataField = 'indate'
          DataSource = dst
          TabOrder = 16
        end
        object dedtbody: TDBEdit
          Left = 320
          Top = 174
          Width = 129
          Height = 28
          DataField = 'body'
          DataSource = dst
          TabOrder = 17
        end
        object dedtbaryear: TDBEdit
          Left = 320
          Top = 201
          Width = 129
          Height = 28
          DataField = 'baryear'
          DataSource = dst
          TabOrder = 18
        end
        object dedtbarstart: TDBEdit
          Left = 320
          Top = 228
          Width = 129
          Height = 28
          DataField = 'barstart'
          DataSource = dst
          TabOrder = 19
        end
        object dedtbarend: TDBEdit
          Left = 320
          Top = 256
          Width = 129
          Height = 28
          DataField = 'barstart'
          DataSource = dst
          TabOrder = 20
        end
        object dedtpcode: TDBEdit
          Left = 68
          Top = 311
          Width = 120
          Height = 28
          DataField = 'pcode'
          DataSource = dst
          TabOrder = 21
        end
        object dedtaddress: TDBEdit
          Left = 320
          Top = 284
          Width = 265
          Height = 28
          DataField = 'address'
          DataSource = dst
          TabOrder = 22
        end
        object dedtlevel: TDBComboBox
          Left = 68
          Top = 259
          Width = 120
          Height = 22
          Style = csOwnerDrawFixed
          DataField = 'level'
          DataSource = dst
          ItemHeight = 16
          Items.Strings = (
            #23567#23398
            #21021#20013
            #39640#20013
            #32844#39640
            #20013#19987
            #22823#19987
            #26412#31185
            #30805#22763
            #21338#22763)
          TabOrder = 9
        end
        object dcbomarried: TDBComboBox
          Left = 320
          Top = 125
          Width = 129
          Height = 22
          Style = csOwnerDrawFixed
          DataField = 'married'
          DataSource = dst
          ItemHeight = 16
          Items.Strings = (
            #26410#23130
            #24050#23130)
          TabOrder = 15
        end
        object dedtdes: TDBEdit
          Left = 320
          Top = 313
          Width = 266
          Height = 28
          DataField = 'des'
          DataSource = dst
          TabOrder = 23
        end
        object dcbodep: TDBComboBox
          Left = 68
          Top = 122
          Width = 120
          Height = 22
          Style = csOwnerDrawFixed
          DataField = 'dep'
          DataSource = dst
          ItemHeight = 16
          TabOrder = 4
        end
        object dcbosex: TDBComboBox
          Left = 68
          Top = 72
          Width = 120
          Height = 22
          Style = csOwnerDrawFixed
          DataField = 'sex'
          DataSource = dst
          ItemHeight = 16
          Items.Strings = (
            #30007
            #22899)
          TabOrder = 2
        end
      end
      object tsexper: TTabSheet
        Caption = #24037#20316#32463#21382
        ImageIndex = 1
        OnShow = tsexperShow
        object Label25: TLabel
          Left = 24
          Top = 248
          Width = 85
          Height = 20
          Caption = #24320'  '#22987#65306
        end
        object Label26: TLabel
          Left = 312
          Top = 248
          Width = 85
          Height = 20
          Caption = #32467'  '#26463#65306
        end
        object Label27: TLabel
          Left = 24
          Top = 280
          Width = 85
          Height = 20
          Caption = #20844'  '#21496#65306
        end
        object Label28: TLabel
          Left = 312
          Top = 280
          Width = 85
          Height = 20
          Caption = #37096'  '#38376#65306
        end
        object Label29: TLabel
          Left = 24
          Top = 312
          Width = 85
          Height = 20
          Caption = #32844'  '#36131#65306
        end
        object dbgexper: TDBGrid
          Left = 8
          Top = 16
          Width = 585
          Height = 209
          Color = 16759701
          FixedColor = clBackground
          ReadOnly = True
          TabOrder = 0
          TitleFont.Charset = GB2312_CHARSET
          TitleFont.Color = clWindowText
          TitleFont.Height = -20
          TitleFont.Name = #26999#20307'_GB2312'
          TitleFont.Style = [fsBold]
          Columns = <
            item
              Expanded = False
              FieldName = 'sdate'
              Title.Caption = #24320#22987#26102#38388
              Width = 100
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'edate'
              Title.Caption = #32467#26463#26102#38388
              Width = 100
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'company'
              Title.Caption = #20844' '#21496
              Width = 120
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'dep'
              Title.Caption = #37096' '#38376
              Width = 71
              Visible = True
            end
            item
              Expanded = False
              FieldName = 'duty'
              Title.Caption = #32844' '#36131
              Width = 165
              Visible = True
            end>
        end
        object dedtsdate: TDBEdit
          Left = 120
          Top = 240
          Width = 161
          Height = 28
          ReadOnly = True
          TabOrder = 1
          OnEnter = dedtsdateEnter
        end
        object dedtdep: TDBEdit
          Left = 408
          Top = 272
          Width = 185
          Height = 28
          TabOrder = 4
        end
        object dedtdutyd: TDBEdit
          Left = 120
          Top = 304
          Width = 473
          Height = 28
          TabOrder = 5
        end
        object dedtedate: TDBEdit
          Left = 408
          Top = 240
          Width = 185
          Height = 28
          TabOrder = 2
        end
        object dedtcom: TDBEdit
          Left = 120
          Top = 272
          Width = 161
          Height = 28
          TabOrder = 3
        end
      end
      object tsfami: TTabSheet
        Caption = #23478#24237#25104#21592
        ImageIndex = 2
        OnShow = tsfamiShow
        object Label30: TLabel
          Left = 24
          Top = 248
          Width = 74
          Height = 20
          Caption = #22995' '#21517#65306
        end
        object Label31: TLabel
          Left = 328
          Top = 248
          Width = 74
          Height = 20
          Caption = #20851' '#31995#65306
        end
        object Label32: TLabel
          Left = 328
          Top = 280
          Width = 74
          Height = 20
          Caption = #21333' '#20301#65306
        end
        object Label33: TLabel
          Left = 24
          Top = 280
          Width = 74
          Height = 20
          Caption = #30005' '#35805#65306
        end
        object Label34: TLabel
          Left = 24
          Top = 312
          Width = 74
          Height = 20
          Caption = #22791' '#27880#65306
        end
        object dbename: TDBEdit
          Left = 112
          Top = 240
          Width = 161
          Height = 28
          ReadOnly = True
          TabOrder = 1
          OnEnter = dbenameEnter
        end
        object dbecom: TDBEdit
          Left = 408
          Top = 272
          Width = 185
          Height = 28
          TabOrder = 4
        end
        object dbetel: TDBEdit
          Left = 112
          Top = 272
          Width = 161
          Height = 28
          TabOrder = 3