department.~dfm

用c++builder编写的人事管理系统,主要用于公司进行人事管理,工资发放使用.界面简介好用,功能较为简单,本人本科设计时编写

    Left = 0
    Top = 32
    Width = 682
    Height = 41
    Align = alNone
    ButtonHeight = 36
    ButtonWidth = 43
    Caption = 'ToolBar1'
    Images = ImageList1
    ShowCaptions = True
    TabOrder = 0
    object First: TToolButton
      Left = 0
      Top = 2
      Caption = #39318#35760#24405
      ImageIndex = 0
      OnClick = FirstClick
    end
    object Prior: TToolButton
      Left = 43
      Top = 2
      Caption = #19978#35760#24405
      ImageIndex = 1
      OnClick = PriorClick
    end
    object Next: TToolButton
      Left = 86
      Top = 2
      Caption = #19979#35760#24405
      ImageIndex = 2
      OnClick = NextClick
    end
    object Last: TToolButton
      Left = 129
      Top = 2
      Caption = #23614#35760#24405
      ImageIndex = 3
      OnClick = LastClick
    end
    object Add: TToolButton
      Left = 172
      Top = 2
      Caption = #22686#21152
      ImageIndex = 4
      OnClick = AddClick
    end
    object Edit: TToolButton
      Left = 215
      Top = 2
      Caption = #20462#25913
      ImageIndex = 5
      OnClick = EditClick
    end
    object Delete: TToolButton
      Left = 258
      Top = 2
      Caption = #21024#38500
      ImageIndex = 6
      OnClick = DeleteClick
    end
    object Save: TToolButton
      Left = 301
      Top = 2
      Caption = #20445#23384
      ImageIndex = 7
      OnClick = SaveClick
    end
    object Cancel: TToolButton
      Left = 344
      Top = 2
      Caption = #25764#28040
      ImageIndex = 8
      OnClick = CancelClick
    end
    object Exit: TToolButton
      Left = 387
      Top = 2
      Caption = #36864#20986
      ImageIndex = 9
      OnClick = ExitClick
    end
  end
  object BitBtn1: TBitBtn
    Left = -8
    Top = 80
    Width = 49
    Height = 41
    Caption = #26597#35810
    TabOrder = 1
    OnClick = BitBtn1Click
  end
  object DBGrid1: TDBGrid
    Left = 0
    Top = 128
    Width = 681
    Height = 241
    DataSource = DataModule1.DataSource2
    TabOrder = 2
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'DNO'
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'DName'
        Width = 83
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'TelNO'
        Width = 201
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'ChargeNO'
        Visible = True
      end>
  end
  object Panel1: TPanel
    Left = 0
    Top = 368
    Width = 681
    Height = 81
    Caption = 'Panel1'
    TabOrder = 3
    object Label3: TLabel
      Left = 16
      Top = 0
      Width = 48
      Height = 13
      Caption = #37096#38376#32534#21495
    end
    object Label4: TLabel
      Left = 200
      Top = 0
      Width = 48
      Height = 13
      Caption = #37096#38376#21517#31216
    end
    object Label5: TLabel
      Left = 408
      Top = 0
      Width = 48
      Height = 13
      Caption = #37096#38376#30005#35805
    end
    object Label6: TLabel
      Left = 0
      Top = 40
      Width = 84
      Height = 13
      Caption = #37096#38376#36127#36131#20154#32534#21495
    end
    object Label7: TLabel
      Left = 208
      Top = 40
      Width = 84
      Height = 13
      Caption = #37096#38376#36127#36131#20154#22995#21517
    end
    object DBEdit1: TDBEdit
      Left = 96
      Top = 0
      Width = 65
      Height = 21
      DataField = 'DNO'
      DataSource = DataModule1.DataSource2
      TabOrder = 0
    end
    object DBEdit3: TDBEdit
      Left = 504
      Top = 0
      Width = 113
      Height = 21
      DataField = 'TelNO'
      DataSource = DataModule1.DataSource2
      TabOrder = 1
    end
    object DBEdit4: TDBEdit
      Left = 96
      Top = 40
      Width = 97
      Height = 21
      DataField = 'ChargeNO'
      DataSource = DataModule1.DataSource2
      TabOrder = 2
    end
    object DBLookupComboBox1: TDBLookupComboBox
      Left = 304
      Top = 40
      Width = 89
      Height = 21
      DataField = 'ChargeNO'
      DataSource = DataModule1.DataSource2
      KeyField = 'ENO'
      ListField = 'EName'
      ListSource = DataModule1.DataSource5
      TabOrder = 3
    end
  end
  object Edit1: TEdit
    Left = 128
    Top = 88
    Width = 65
    Height = 21
    TabOrder = 4
    Text = 'Edit1'
  end
  object Edit2: TEdit
    Left = 272
    Top = 88
    Width = 81
    Height = 21
    TabOrder = 5
    Text = 'Edit2'
  end
  object DBEdit2: TDBEdit
    Left = 272
    Top = 368
    Width = 121
    Height = 21
    DataField = 'DName'
    DataSource = DataModule1.DataSource2
    TabOrder = 6
  end
  object ImageList1: TImageList
    Left = 656
    Top = 56
  end
end