object F_main: TF_main
  Left = 205
  Top = 150
  Width = 696
  Height = 480
  Caption = '工資管理系統(tǒng)'
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋體'
  Font.Style = []
  Menu = MainMenu1
  OldCreateOrder = False
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 12
  object Label2: TLabel
    Left = 8
    Top = 16
    Width = 36
    Height = 12
    Caption = '部門：'
  end
  object Label3: TLabel
    Left = 8
    Top = 40
    Width = 60
    Height = 12
    Caption = '員工列表：'
  end
  object Label7: TLabel
    Left = 128
    Top = 200
    Width = 97
    Height = 13
    Anchors = [akTop]
    AutoSize = False
    Caption = '固定福利津貼：'
  end
  object Label14: TLabel
    Left = 272
    Top = 200
    Width = 60
    Height = 13
    Anchors = [akTop]
    AutoSize = False
    Caption = '月度獎金：'
  end
  object Label15: TLabel
    Left = 416
    Top = 200
    Width = 81
    Height = 13
    Anchors = [akTop]
    AutoSize = False
    Caption = '月度福利津貼：'
  end
  object Label16: TLabel
    Left = 560
    Top = 200
    Width = 60
    Height = 13
    Anchors = [akTop]
    AutoSize = False
    Caption = '月度扣發(fā)：'
  end
  object Gauge1: TGauge
    Left = 208
    Top = 376
    Width = 97
    Height = 17
    Progress = 0
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 415
    Width = 688
    Height = 19
    AutoHint = True
    Panels = <
      item
        Width = 300
      end
      item
        Style = psOwnerDraw
        Width = 100
      end
      item
        Text = '尚未登錄服務(wù)器。請按F2登錄。'
        Width = 200
      end>
    SimplePanel = False
  end
  object GroupBox1: TGroupBox
    Left = 120
    Top = 8
    Width = 561
    Height = 57
    Anchors = [akTop]
    Caption = '基本信息'
    TabOrder = 1
    object Label1: TLabel
      Left = 160
      Top = 24
      Width = 48
      Height = 13
      AutoSize = False
      Caption = '員工號：'
    end
    object Label4: TLabel
      Left = 280
      Top = 24
      Width = 36
      Height = 13
      AutoSize = False
      Caption = '姓名：'
    end
    object Label5: TLabel
      Left = 384
      Top = 24
      Width = 60
      Height = 13
      AutoSize = False
      Caption = '基本工資：'
    end
    object Label6: TLabel
      Left = 504
      Top = 24
      Width = 49
      Height = 13
      AutoSize = False
      Caption = '元/小時'
    end
    object Label13: TLabel
      Left = 16
      Top = 24
      Width = 60
      Height = 12
      Caption = '部門名稱：'
    end
    object i_salary: TDBEdit
      Left = 440
      Top = 20
      Width = 57
      Height = 20
      Hint = '基本工資設(shè)置'
      DataField = 'SALARY'
      DataSource = DM_main.DS_salary_set
      TabOrder = 0
    end
    object i_person_id: TMaskEdit
      Left = 208
      Top = 20
      Width = 65
      Height = 20
      Hint = '輸入員工號，顯示相應(yīng)信息。'
      EditMask = '>a!99999;1;_'
      MaxLength = 6
      TabOrder = 1
      Text = '      '
      OnChange = i_person_idChange
    end
    object i_person_name: TEdit
      Left = 312
      Top = 20
      Width = 65
      Height = 20
      Hint = '員工姓名'
      Enabled = False
      TabOrder = 2
    end
    object i_depart_name: TEdit
      Left = 80
      Top = 20
      Width = 73
      Height = 20
      Hint = '部門名稱'
      Enabled = False
      TabOrder = 3
    end
  end
  object DBGrid1: TDBGrid
    Left = 8
    Top = 56
    Width = 105
    Height = 353
    Anchors = [akLeft, akTop, akBottom]
    DataSource = DM_main.DS_person_list
    TabOrder = 2
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = '宋體'
    TitleFont.Style = []
    OnDblClick = DBGrid1DblClick
    Columns = <
      item
        Expanded = False
        FieldName = 'ID'
        Title.Caption = '員工號'
        Width = 42
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'NAME'
        Title.Caption = '姓名'
        Visible = True
      end>
  end
  object i_depart_id: TMaskEdit
    Left = 48
    Top = 12
    Width = 65
    Height = 20
    Hint = '輸入部門代碼，檢索部門員工。輸入*號，顯示所有員工。'
    EditMask = '>ccc;1;_'
    MaxLength = 3
    TabOrder = 3
    Text = '   '
    OnChange = i_depart_idChange
  end
  object GroupBox2: TGroupBox
    Left = 120
    Top = 72
    Width = 561
    Height = 113
    Anchors = [akTop]
    Caption = '添加獎金、福利、津貼、扣發(fā)項'
    TabOrder = 4
    object Label8: TLabel
      Left = 24
      Top = 24
      Width = 36
      Height = 12
      Caption = '年月：'
    end
    object Label9: TLabel
      Left = 160
      Top = 56
      Width = 36
      Height = 12
      Caption = '金額：'
    end
    object Label10: TLabel
      Left = 280
      Top = 56
      Width = 12
      Height = 12
      Caption = '元'
    end
    object Label11: TLabel
      Left = 160
      Top = 24
      Width = 36
      Height = 12
      Caption = '名目：'
    end
    object Label12: TLabel
      Left = 312
      Top = 24
      Width = 60
      Height = 12
      Caption = '具體說明：'
    end
    object i_yearmonth: TMaskEdit
      Left = 64
      Top = 20
      Width = 73
      Height = 20
      Hint = '月度編號，格式：YYYY-MM'
      EditMask = '!0000-00;1;_'
      MaxLength = 7
      TabOrder = 0
      Text = '    -  '
      OnChange = i_yearmonthChange
    end
    object i_type: TRadioGroup
      Left = 24
      Top = 48
      Width = 113
      Height = 57
      Caption = '項目'
      Columns = 2
      ItemIndex = 0
      Items.Strings = (
        '獎金'
        '福利'
        '津貼'
        '扣發(fā)')
      TabOrder = 1
    end
    object i_money: TSpinEdit
      Left = 200
      Top = 51
      Width = 73
      Height = 21
      Hint = '輸入金額'
      Increment = 100
      MaxLength = 5
      MaxValue = 100000
      MinValue = 0
      TabOrder = 2
      Value = 0
    end
    object i_name: TComboBox
      Left = 200
      Top = 20
      Width = 97
      Height = 20
      Hint = '請選擇或輸入項目名稱'
      ItemHeight = 12
      TabOrder = 3
      Items.Strings = (
        '獎金'
        '福利1'
        '福利2'
        '福利3'
        '津貼1'
        '津貼2'
        '津貼3'
        '扣罰1'
        '扣罰2'
        '扣罰3')
    end
    object i_fixed: TCheckBox
      Left = 176
      Top = 80
      Width = 113
      Height = 17
      Hint = '固定福利津貼將在每個月的計算中使用。'
      Caption = '固定福利津貼'
      TabOrder = 4
    end
    object i_description: TMemo
      Left = 312
      Top = 40
      Width = 121
      Height = 57
      Hint = '輸入說明，用于今后的檢查。'
      TabOrder = 5
    end
    object B_add_person: TButton
      Left = 440
      Top = 64
      Width = 99
      Height = 25
      Hint = '當(dāng)前員工添加該項記錄'
      Caption = '當(dāng)前員工添加'
      TabOrder = 6
      OnClick = B_add_personClick
    end
    object B_add_list: TButton
      Left = 440
      Top = 32
      Width = 99
      Height = 25
      Hint = '當(dāng)前部門內(nèi)的員工添加該項金額'
      Caption = '列表員工添加'
      TabOrder = 7
      OnClick = B_add_listClick
    end
  end
  object DBGrid2: TDBGrid
    Left = 120
    Top = 216
    Width = 129
    Height = 193
    Hint = '點擊右鍵進行操作'
    Anchors = [akTop, akBottom]
    DataSource = DM_main.DS_salary_1
    PopupMenu = PopupMenu1
    TabOrder = 5
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = '宋體'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'NAME'
        Title.Caption = '名稱'
        Width = 46
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'MONEY'
        Title.Caption = '金額'
        Width = 42
        Visible = True
      end>
  end
  object DBGrid3: TDBGrid
    Left = 264
    Top = 216
    Width = 129
    Height = 193
    Hint = '單擊右鍵進行操作'
    Anchors = [akTop, akBottom]
    DataSource = DM_main.DS_salary_2
    PopupMenu = PopupMenu1
    TabOrder = 6
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = '宋體'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'NAME'
        Title.Caption = '名稱'
        Width = 45
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'MONEY'
        Title.Caption = '金額'
        Width = 44
        Visible = True
      end>
  end
  object DBGrid4: TDBGrid
    Left = 408
    Top = 216
    Width = 129
    Height = 193
    Hint = '點擊右鍵進行操作'
    Anchors = [akTop, akBottom]
    DataSource = DM_main.DS_salary_3
    PopupMenu = PopupMenu1
    TabOrder = 7
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = '宋體'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'NAME'
        Title.Caption = '名稱'
        Width = 46
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'MONEY'
        Title.Caption = '金額'
        Width = 44
        Visible = True
      end>
  end
  object DBGrid5: TDBGrid
    Left = 552
    Top = 216
    Width = 129
    Height = 193
    Hint = '點擊右鍵進行操作'
    Anchors = [akTop, akBottom]
    DataSource = DM_main.DS_salary_4
    PopupMenu = PopupMenu1
    TabOrder = 8
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -12
    TitleFont.Name = '宋體'
    TitleFont.Style = []
    Columns = <
      item
        Expanded = False
        FieldName = 'NAME'
        Title.Caption = '名稱'
        Width = 46
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'MONEY'
        Title.Caption = '金額'
        Width = 41
        Visible = True
      end>
  end
  object MainMenu1: TMainMenu
    Left = 40
    Top = 120
    object M_system: TMenuItem
      Caption = '&S系統(tǒng)'
      Hint = '系統(tǒng)菜單'
      object M_connect: TMenuItem
        Caption = '&C連接...'
        Hint = '連接服務(wù)器'
        ShortCut = 113
        OnClick = M_connectClick
      end
      object M_disconnect: TMenuItem
        Caption = '&D斷開連接'
        Hint = '斷開服務(wù)器連接'
        ShortCut = 114
        OnClick = M_disconnectClick
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object M_exit: TMenuItem
        Caption = '&X退出'
        Hint = '退出應(yīng)用程序'
        ShortCut = 16465
        OnClick = M_exitClick
      end
    end
    object M_option: TMenuItem
      Caption = '&O設(shè)置'
      Hint = '設(shè)置菜單'
      object M_formula: TMenuItem
        Caption = '&F計算公式調(diào)整'
        Hint = '調(diào)整工資計算公式參數(shù)'
        OnClick = M_formulaClick
      end
    end
    object M_calculate: TMenuItem
      Caption = '&C計算'
      Hint = '計算菜單'
      object M_stat: TMenuItem
        Caption = '&S統(tǒng)計實發(fā)工資'
        Hint = '統(tǒng)計所有員工當(dāng)月的工資'
        OnClick = M_statClick
      end
    end
    object M_report: TMenuItem
      Caption = '&R報表'
      Hint = '報表菜單'
      object M_printer_setup: TMenuItem
        Caption = '&S打印機設(shè)置'
        Hint = '設(shè)置打印機屬性'
        OnClick = M_printer_setupClick
      end
      object M_preview: TMenuItem
        Caption = '&R預(yù)覽報表'
        Hint = '預(yù)覽報表'
        OnClick = M_previewClick
      end
      object M_print: TMenuItem
        Caption = '&P打印報表'
        Hint = '打印報表'
        OnClick = M_printClick
      end
    end
  end
  object PopupMenu1: TPopupMenu
    Left = 40
    Top = 176
    object M_delete: TMenuItem
      Caption = '刪除當(dāng)前記錄'
      OnClick = M_deleteClick
    end
  end
end