fpayedit.dfm

这是一款功能齐全的人力资源管理软件系统,是成功运用于企业的管理软件,具有很高的研究价值

        Left = 10
        Top = 8
        Width = 319
        Height = 217
        TabOrder = 0
        object Label1: TLabel
          Left = 16
          Top = 32
          Width = 48
          Height = 12
          Caption = #31867#21035#21517#31216
        end
        object Label2: TLabel
          Left = 16
          Top = 60
          Width = 48
          Height = 12
          Caption = #31867#21035#31867#22411
        end
        object Label3: TLabel
          Left = 16
          Top = 88
          Width = 48
          Height = 12
          Caption = #31867#21035#37329#39069
        end
        object Label5: TLabel
          Left = 16
          Top = 144
          Width = 48
          Height = 12
          Caption = #36215#22987#26085#26399
        end
        object Label6: TLabel
          Left = 16
          Top = 172
          Width = 48
          Height = 12
          Caption = #32467#26463#26085#26399
        end
        object Label4: TLabel
          Left = 16
          Top = 116
          Width = 48
          Height = 12
          Caption = #35745#31639#26041#24335
        end
        object cxDBTextEdit1: TcxDBTextEdit
          Left = 72
          Top = 28
          Width = 217
          Height = 20
          DataBinding.DataSource = Main.r_staffpaySource
          DataBinding.DataField = 'paytype'
          Style.LookAndFeel.Kind = lfStandard
          TabOrder = 0
        end
        object cxDBImageComboBox1: TcxDBImageComboBox
          Left = 72
          Top = 56
          Width = 81
          Height = 20
          DataBinding.DataSource = Main.r_staffpaySource
          DataBinding.DataField = 'payedit'
          Properties.Items = <
            item
              Description = '+'
              Value = '+'
            end
            item
              Description = '-'
              Value = '-'
            end
            item
              Description = '*'
              Value = '*'
            end
            item
              Description = '/'
              Value = '/'
            end>
          Style.LookAndFeel.Kind = lfStandard
          TabOrder = 1
        end
        object cxDBCurrencyEdit1: TcxDBCurrencyEdit
          Left = 72
          Top = 84
          Width = 105
          Height = 20
          DataBinding.DataSource = Main.r_staffpaySource
          DataBinding.DataField = 'payfloat'
          Style.LookAndFeel.Kind = lfStandard
          TabOrder = 2
          OnKeyPress = cxDBCurrencyEdit1KeyPress
        end
        object cxDBDateEdit1: TcxDBDateEdit
          Left = 72
          Top = 140
          Width = 121
          Height = 20
          DataBinding.DataSource = Main.r_staffpaySource
          DataBinding.DataField = 'pstardate'
          Style.LookAndFeel.Kind = lfStandard
          TabOrder = 3
        end
        object cxDBDateEdit2: TcxDBDateEdit
          Left = 72
          Top = 168
          Width = 121
          Height = 20
          DataBinding.DataSource = Main.r_staffpaySource
          DataBinding.DataField = 'penddate'
          Style.LookAndFeel.Kind = lfStandard
          TabOrder = 4
        end
        object DBCheckBox1: TDBCheckBox
          Left = 208
          Top = 86
          Width = 97
          Height = 17
          Caption = #26159#21542#25353'%'#35745#31639
          DataField = 'ifpercent'
          DataSource = Main.r_staffpaySource
          TabOrder = 5
          ValueChecked = 'True'
          ValueUnchecked = 'False'
        end
        object cxDBImageComboBox2: TcxDBImageComboBox
          Left = 72
          Top = 112
          Width = 81
          Height = 20
          DataBinding.DataSource = Main.r_staffpaySource
          DataBinding.DataField = 'accounttype'
          Properties.Items = <
            item
              Description = #23567#26102
              Value = '1'
            end
            item
              Description = #22825
              Value = '2'
            end
            item
              Description = #26376
              Value = '3'
            end
            item
              Description = #24180
              Value = '4'
            end>
          Style.LookAndFeel.Kind = lfStandard
          TabOrder = 6
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = #22791#27880
      ImageIndex = 1
      object cxDBMemo1: TcxDBMemo
        Left = 8
        Top = 8
        Width = 321
        Height = 337
        DataBinding.DataSource = Main.r_staffpaySource
        DataBinding.DataField = 'pmemo'
        Style.LookAndFeel.Kind = lfStandard
        TabOrder = 0
      end
    end
  end
  object Button1: TButton
    Left = 272
    Top = 400
    Width = 75
    Height = 25
    Cancel = True
    Caption = #21462#28040
    TabOrder = 1
    OnClick = Button1Click
  end
  object Button2: TButton
    Left = 192
    Top = 400
    Width = 75
    Height = 25
    Caption = #30830#23450
    Default = True
    TabOrder = 2
    OnClick = Button2Click
  end
end