wage.dfm

速达开源ERP系统

inherited frmWage: TfrmWage
  Left = 72
  Top = 93
  Caption = '员工工资汇总表'
  ClientHeight = 405
  ClientWidth = 720
  OldCreateOrder = True
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  inherited sbBar: TStatusBar
    Top = 383
    Width = 720
  end
  inherited CoolBar1: TCoolBar
    Width = 720
    Bands = <
      item
        Control = tbMainBar
        ImageIndex = -1
        MinHeight = 35
        Width = 720
      end>
    inherited tbMainBar: TToolBar
      Width = 707
      ButtonWidth = 43
      inherited ToolButton10: TToolButton
        Width = 5
      end
      inherited tbGenrate: TToolButton
        Left = 110
      end
      inherited ToolButton3: TToolButton
        Left = 145
      end
      inherited tbCancel: TToolButton
        Left = 147
      end
      inherited tbSave: TToolButton
        Left = 182
      end
      inherited ToolButton6: TToolButton
        Left = 217
      end
      inherited tbCheck: TToolButton
        Left = 219
      end
      inherited tbClose: TToolButton
        Left = 254
      end
      inherited ToolButton1: TToolButton
        Left = 297
      end
      inherited tbFirst: TToolButton
        Left = 299
      end
      inherited tbPrevious: TToolButton
        Left = 334
      end
      inherited tbNext: TToolButton
        Left = 369
      end
      inherited tbLast: TToolButton
        Left = 404
      end
      inherited ToolButton2: TToolButton
        Left = 439
      end
      inherited tbQuery: TToolButton
        Left = 441
      end
      inherited tbPrint: TToolButton
        Left = 476
      end
      inherited tbExport: TToolButton
        Left = 511
      end
      inherited ToolButton4: TToolButton
        Left = 546
      end
      inherited tbHelp: TToolButton
        Left = 548
      end
      inherited tbControl: TToolButton
        Left = 583
      end
      object tbDuplic: TToolButton
        Left = 618
        Top = 0
        Caption = '月复制'
        ImageIndex = 14
        OnClick = tbDuplicClick
      end
    end
  end
  object sgWage: TSDGrid [2]
    Left = 0
    Top = 70
    Width = 469
    Height = 313
    Align = alLeft
    Color = clWhite
    ColCount = 10
    Ctl3D = False
    DefaultRowHeight = 18
    FixedColor = 8564917
    FixedCols = 0
    Font.Charset = GB2312_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = '宋体'
    Font.Style = []
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goRowSizing, goColSizing, goRowSelect]
    ParentCtl3D = False
    ParentFont = False
    TabOrder = 2
    OnClick = sgWageClick
    SelectColor = clBackground
    EvenGridColor = clWhite
    OddGridColor = clWhite
    Columns = <
      item
        ColumnFont.Charset = DEFAULT_CHARSET
        ColumnFont.Color = clWindowText
        ColumnFont.Height = -11
        ColumnFont.Name = 'MS Sans Serif'
        ColumnFont.Style = []
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clNavy
        ColumnFont.Height = -13
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        TitleString = '员工编号'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clNavy
        ColumnFont.Height = -13
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        ColHorAlign = haRight
        TitleString = '合计'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clNavy
        ColumnFont.Height = -13
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        ColHorAlign = haRight
        TitleString = '固定工资'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clNavy
        ColumnFont.Height = -13
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        ColHorAlign = haRight
        TitleString = '奖金'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clNavy
        ColumnFont.Height = -13
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        ColHorAlign = haRight
        TitleString = '津贴'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clNavy
        ColumnFont.Height = -13
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        ColHorAlign = haRight
        TitleString = '其它'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clNavy
        ColumnFont.Height = -13
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        ColHorAlign = haRight
        TitleString = '计件工资'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clNavy
        ColumnFont.Height = -13
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        ColHorAlign = haRight
        TitleString = '计时工资'
        ColumnWidth = 0
      end
      item
        ColumnFont.Charset = GB2312_CHARSET
        ColumnFont.Color = clNavy
        ColumnFont.Height = -13
        ColumnFont.Name = '宋体'
        ColumnFont.Style = []
        ColHorAlign = haRight
        TitleString = '税金'
        ColumnWidth = 0
      end>
    ColWidths = (
      10
      65
      53
      50
      46
      46
      42
      51
      50
      44)
  end
  object FloatPanel1: TFloatPanel [3]
    Left = 469
    Top = 70
    Width = 251
    Height = 313
    Align = alClient
    Color = clWhite
    Caption = 'FloatPanel1'
    ParentColor = False
    TabOrder = 3
    object Label3: TLabel
      Left = 18
      Top = 23
      Width = 60
      Height = 12
      Caption = '员工编号：'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 18
      Top = 79
      Width = 36
      Height = 12
      Caption = '奖金：'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 18
      Top = 107
      Width = 36
      Height = 12
      Caption = '津贴：'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label6: TLabel
      Left = 18
      Top = 135
      Width = 36
      Height = 12
      Caption = '其它：'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label7: TLabel
      Left = 18
      Top = 162
      Width = 60
      Height = 12
      Caption = '计件工资：'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label8: TLabel
      Left = 18
      Top = 190
      Width = 60
      Height = 12
      Caption = '计时工资：'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label9: TLabel
      Left = 18
      Top = 218
      Width = 36
      Height = 12
      Caption = '税金：'
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label10: TLabel
      Left = 18
      Top = 246
      Width = 36
      Height = 12
      Caption = '合计：'
      Enabled = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object Label11: TLabel
      Left = 18
      Top = 51
      Width = 60
      Height = 12
      Caption = '固定工资：'
    end
    object lbWageSum: TLabel
      Left = 92
      Top = 244
      Width = 54
      Height = 12
      Caption = 'lbWageSum'
    end
    object SpCopy: TSpeedButton
      Left = 190
      Top = 51
      Width = 24
      Height = 22
      Cursor = crHandPoint
      Hint = '参照另一员工'
      Enabled = False
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33333333333FFFFFFFFF333333000000000033333377777777773333330FFFFF
        FFF03333337F333333373333330FFFFFFFF03333337F3FF3FFF73333330F00F0
        00F03333F37F773777373330330FFFFFFFF03337FF7F3F3FF3F73339030F0800
        F0F033377F7F737737373339900FFFFFFFF03FF7777F3FF3FFF70999990F00F0
        00007777777F7737777709999990FFF0FF0377777777FF37F3730999999908F0
        F033777777777337F73309999990FFF0033377777777FFF77333099999000000
        3333777777777777333333399033333333333337773333333333333903333333
        3333333773333333333333303333333333333337333333333333}
      NumGlyphs = 2
      ParentShowHint = False
      ShowHint = True
      OnClick = SpCopyClick
    end
    object seWageTax: TSDEdit
      Left = 88
      Top = 214
      Width = 125
      Height = 18
      Ctl3D = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentColor = True
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 7
      Text = '0'
      OnEnter = seWageTaxEnter
      DigLen = 2
      DataType = dtNumber
      CharType = ctMathematic
      SplitSymbol = ' | '
      DefaultValue = '0'
    end
    object seWageFix: TSDEdit
      Left = 88
      Top = 48
      Width = 103
      Height = 18
      Ctl3D = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentColor = True
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 1
      Text = '0'
      OnExit = seWageTaxEnter
      DigLen = 2
      DataType = dtNumber
      CharType = ctMathematic
      SplitSymbol = ' | '
      DefaultValue = '0'
    end
    object seWageAnce: TSDEdit
      Left = 88
      Top = 103
      Width = 125
      Height = 18
      Ctl3D = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentColor = True
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 3
      Text = '0'
      OnExit = seWageTaxEnter
      DigLen = 2
      DataType = dtNumber
      CharType = ctMathematic
      SplitSymbol = ' | '
      DefaultValue = '0'
    end
    object seWageOther: TSDEdit
      Left = 88
      Top = 131
      Width = 125
      Height = 18
      Ctl3D = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentColor = True
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 4
      Text = '0'
      OnExit = seWageTaxEnter
      DigLen = 2
      DataType = dtNumber
      CharType = ctMathematic
      SplitSymbol = ' | '
      DefaultValue = '0'
    end
    object seWageBorus: TSDEdit
      Left = 88
      Top = 75
      Width = 125
      Height = 18
      Ctl3D = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentColor = True
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 2
      Text = '0'
      OnExit = seWageTaxEnter
      DigLen = 2
      DataType = dtNumber
      CharType = ctMathematic
      SplitSymbol = ' | '
      DefaultValue = '0'
    end
    object seWagePiece: TSDEdit
      Left = 88
      Top = 159
      Width = 125
      Height = 18
      Ctl3D = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentColor = True
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 5
      Text = '0'
      OnExit = seWageTaxEnter
      DigLen = 2
      DataType = dtNumber
      CharType = ctMathematic
      SplitSymbol = ' | '
      DefaultValue = '0'
    end
    object seWageLab: TSDEdit
      Left = 88
      Top = 186
      Width = 125
      Height = 18
      Ctl3D = False
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentColor = True
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 6
      Text = '0'
      OnExit = seWageTaxEnter
      DigLen = 2
      DataType = dtNumber
      CharType = ctMathematic
      SplitSymbol = ' | '
      DefaultValue = '0'
    end
    object scWageEmployee: TSDComboBox
      Left = 88
      Top = 20
      Width = 125
      Height = 20
      Color = clWhite
      Ctl3D = False
      ItemHeight = 12
      ParentCtl3D = False
      TabOrder = 0
      Text = 'scWageEmployee'
      OnClick = scWageEmployeeClick
      KeyItem = cbItem2
    end
  end
  object FloatPanel2: TFloatPanel [4]
    Left = 0
    Top = 39
    Width = 720
    Height = 31
    Align = alTop
    Color = clWhite
    Caption = 'FloatPanel2'
    ParentColor = False
    TabOrder = 4
    object Label2: TLabel
      Left = 18
      Top = 7
      Width = 60
      Height = 12
      AutoSize = False
      Caption = '财务月份:'
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ParentFont = False
    end
    object cbWageFmonth: TSDComboBox
      Left = 91
      Top = 3
      Width = 134
      Height = 20
      Color = clWhite
      Ctl3D = False
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -12
      Font.Name = '宋体'
      Font.Style = []
      ItemHeight = 12
      ParentCtl3D = False
      ParentFont = False
      TabOrder = 0
      OnClick = cbWageFmonthClick
    end
  end
end