kqgz.dfm

企业员工考勤和工资管理系统

object FormKqgz: TFormKqgz
  Left = 113
  Top = 117
  Width = 617
  Height = 423
  Caption = '考勤规则设定'
  Color = clBtnFace
  Font.Charset = GB2312_CHARSET
  Font.Color = clWindowText
  Font.Height = -12
  Font.Name = '宋体'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 12
  object PageControl1: TPageControl
    Left = 3
    Top = 4
    Width = 602
    Height = 337
    ActivePage = TabSheet1
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = '迟到早退规则设定'
      object Label1: TLabel
        Left = 176
        Top = 33
        Width = 81
        Height = 13
        AutoSize = False
        Caption = '允许迟到(&L)'
        FocusControl = DBEdit1
      end
      object Label2: TLabel
        Left = 176
        Top = 129
        Width = 81
        Height = 13
        AutoSize = False
        Caption = '允许早退(&M)'
        FocusControl = DBEdit2
      end
      object Label3: TLabel
        Left = 390
        Top = 34
        Width = 41
        Height = 13
        AutoSize = False
        Caption = '分钟'
      end
      object Label4: TLabel
        Left = 390
        Top = 130
        Width = 49
        Height = 13
        AutoSize = False
        Caption = '分钟'
      end
      object DBEdit1: TDBEdit
        Left = 263
        Top = 30
        Width = 121
        Height = 20
        DataField = 'sj'
        DataSource = DataSource1
        TabOrder = 0
      end
      object DBEdit2: TDBEdit
        Left = 263
        Top = 126
        Width = 121
        Height = 20
        DataField = 'sj'
        DataSource = DataSource2
        TabOrder = 1
      end
      object BitBtn1: TBitBtn
        Left = 256
        Top = 239
        Width = 108
        Height = 28
        Caption = '保存(&S)'
        TabOrder = 2
        OnClick = BitBtn1Click
        Glyph.Data = {
          DE010000424DDE01000000000000760000002800000024000000120000000100
          0400000000006801000000000000000000001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333333333333330000333333333333333333333333F33333333333
          00003333344333333333333333388F3333333333000033334224333333333333
          338338F3333333330000333422224333333333333833338F3333333300003342
          222224333333333383333338F3333333000034222A22224333333338F338F333
          8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
          33333338F83338F338F33333000033A33333A222433333338333338F338F3333
          0000333333333A222433333333333338F338F33300003333333333A222433333
          333333338F338F33000033333333333A222433333333333338F338F300003333
          33333333A222433333333333338F338F00003333333333333A22433333333333
          3338F38F000033333333333333A223333333333333338F830000333333333333
          333A333333333333333338330000333333333333333333333333333333333333
          0000}
        NumGlyphs = 2
      end
    end
    object TabSheet2: TTabSheet
      Caption = '平时加班规则设定'
      ImageIndex = 1
      object RadioGroup1: TRadioGroup
        Left = 140
        Top = 21
        Width = 330
        Height = 48
        Caption = '平时加班计算方法选择'
        TabOrder = 0
      end
      object RBDnjs: TRadioButton
        Left = 209
        Top = 41
        Width = 96
        Height = 15
        Caption = '电脑计算'
        TabOrder = 1
        OnClick = RBDnjsClick
      end
      object RBSdlr: TRadioButton
        Left = 349
        Top = 41
        Width = 97
        Height = 15
        Caption = '手工录入'
        TabOrder = 2
        OnClick = RBSdlrClick
      end
      object GroupBox1: TGroupBox
        Left = 140
        Top = 82
        Width = 330
        Height = 138
        Caption = '电脑计算平时加班规则选择'
        TabOrder = 3
        object Label5: TLabel
          Left = 186
          Top = 35
          Width = 84
          Height = 12
          Caption = '分钟起作为加班'
        end
        object RBYs: TRadioButton
          Left = 41
          Top = 34
          Width = 97
          Height = 15
          Caption = '下班延时超过'
          TabOrder = 0
        end
        object MaskEditFz: TMaskEdit
          Left = 135
          Top = 33
          Width = 42
          Height = 20
          EditMask = '99999;1; '
          MaxLength = 5
          TabOrder = 1
          Text = '     '
        end
        object RBSk: TRadioButton
          Left = 41
          Top = 89
          Width = 284
          Height = 15
          Caption = '下班必须正常刷卡，加班开始、结束也必须刷卡'
          TabOrder = 2
        end
      end
      object BitBtn3: TBitBtn
        Left = 258
        Top = 240
        Width = 104
        Height = 27
        Caption = '保    存(&S)'
        TabOrder = 4
        OnClick = BitBtn3Click
        Glyph.Data = {
          DE010000424DDE01000000000000760000002800000024000000120000000100
          0400000000006801000000000000000000001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333333333333330000333333333333333333333333F33333333333
          00003333344333333333333333388F3333333333000033334224333333333333
          338338F3333333330000333422224333333333333833338F3333333300003342
          222224333333333383333338F3333333000034222A22224333333338F338F333
          8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
          33333338F83338F338F33333000033A33333A222433333338333338F338F3333
          0000333333333A222433333333333338F338F33300003333333333A222433333
          333333338F338F33000033333333333A222433333333333338F338F300003333
          33333333A222433333333333338F338F00003333333333333A22433333333333
          3338F38F000033333333333333A223333333333333338F830000333333333333
          333A333333333333333338330000333333333333333333333333333333333333
          0000}
        NumGlyphs = 2
      end
    end
    object TabSheet3: TTabSheet
      Caption = '休息日加班规则设定'
      ImageIndex = 2
      object DBRadioGroup1: TDBRadioGroup
        Left = 186
        Top = 21
        Width = 241
        Height = 151
        Caption = '休息日加班计算方法选择'
        DataField = 'fs'
        DataSource = DataSource3
        Items.Strings = (
          '电脑计算'
          '手工录入')
        TabOrder = 0
        Values.Strings = (
          '1'
          '2')
      end
      object BitBtn4: TBitBtn
        Left = 253
        Top = 240
        Width = 112
        Height = 27
        Caption = '保    存(&S)'
        TabOrder = 1
        OnClick = BitBtn4Click
        Glyph.Data = {
          DE010000424DDE01000000000000760000002800000024000000120000000100
          0400000000006801000000000000000000001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333333333333330000333333333333333333333333F33333333333
          00003333344333333333333333388F3333333333000033334224333333333333
          338338F3333333330000333422224333333333333833338F3333333300003342
          222224333333333383333338F3333333000034222A22224333333338F338F333
          8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
          33333338F83338F338F33333000033A33333A222433333338333338F338F3333
          0000333333333A222433333333333338F338F33300003333333333A222433333
          333333338F338F33000033333333333A222433333333333338F338F300003333
          33333333A222433333333333338F338F00003333333333333A22433333333333
          3338F38F000033333333333333A223333333333333338F830000333333333333
          333A333333333333333338330000333333333333333333333333333333333333
          0000}
        NumGlyphs = 2
      end
    end
    object TabSheet4: TTabSheet
      Caption = '节假日加班规则设定'
      ImageIndex = 3
      object BitBtn5: TBitBtn
        Left = 254
        Top = 232
        Width = 105
        Height = 26
        Caption = '保　　存(&S)'
        TabOrder = 0
        OnClick = BitBtn5Click
        Glyph.Data = {
          DE010000424DDE01000000000000760000002800000024000000120000000100
          0400000000006801000000000000000000001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333333333333330000333333333333333333333333F33333333333
          00003333344333333333333333388F3333333333000033334224333333333333
          338338F3333333330000333422224333333333333833338F3333333300003342
          222224333333333383333338F3333333000034222A22224333333338F338F333
          8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
          33333338F83338F338F33333000033A33333A222433333338333338F338F3333
          0000333333333A222433333333333338F338F33300003333333333A222433333
          333333338F338F33000033333333333A222433333333333338F338F300003333
          33333333A222433333333333338F338F00003333333333333A22433333333333
          3338F38F000033333333333333A223333333333333338F830000333333333333
          333A333333333333333338330000333333333333333333333333333333333333
          0000}
        NumGlyphs = 2
      end
      object DBRadioGroup2: TDBRadioGroup
        Left = 180
        Top = 23
        Width = 248
        Height = 144
        Caption = '节假日加班计算方法选择'
        DataField = 'fs'
        DataSource = DataSource4
        Items.Strings = (
          '电脑计算'
          '手工录入')
        TabOrder = 1
        Values.Strings = (
          '1'
          '2')
      end
    end
    object TabSheet5: TTabSheet
      Caption = '连续刷卡无效规则设定'
      ImageIndex = 4
      object Label6: TLabel
        Left = 271
        Top = 86
        Width = 108
        Height = 12
        Caption = '分钟内连续刷卡无效'
      end
      object Label7: TLabel
        Left = 172
        Top = 86
        Width = 48
        Height = 12
        Caption = '同一卡片'
      end
      object DBEdit3: TDBEdit
        Left = 225
        Top = 82
        Width = 37
        Height = 20
        DataField = 'sj'
        DataSource = DataSource5
        TabOrder = 0
      end
      object BitBtn6: TBitBtn
        Left = 257
        Top = 200
        Width = 91
        Height = 25
        Caption = '保存(&S)'
        TabOrder = 1
        OnClick = BitBtn6Click
        Glyph.Data = {
          DE010000424DDE01000000000000760000002800000024000000120000000100
          0400000000006801000000000000000000001000000000000000000000000000
          80000080000000808000800000008000800080800000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333333333333330000333333333333333333333333F33333333333
          00003333344333333333333333388F3333333333000033334224333333333333
          338338F3333333330000333422224333333333333833338F3333333300003342
          222224333333333383333338F3333333000034222A22224333333338F338F333
          8F33333300003222A3A2224333333338F3838F338F33333300003A2A333A2224
          33333338F83338F338F33333000033A33333A222433333338333338F338F3333
          0000333333333A222433333333333338F338F33300003333333333A222433333
          333333338F338F33000033333333333A222433333333333338F338F300003333
          33333333A222433333333333338F338F00003333333333333A22433333333333
          3338F38F000033333333333333A223333333333333338F830000333333333333
          333A333333333333333338330000333333333333333333333333333333333333
          0000}
        NumGlyphs = 2
      end
    end
  end
  object BitBtn2: TBitBtn
    Left = 269
    Top = 360
    Width = 96
    Height = 25
    Caption = '退出(&Q)'
    TabOrder = 1
    Kind = bkClose
  end
  object DataSource1: TDataSource
    Left = 493
    Top = 30
  end
  object DataSource2: TDataSource
    Left = 501
    Top = 62
  end
  object DataSource3: TDataSource
    DataSet = DataModal1.QGzXxjb
    Left = 496
    Top = 112
  end
  object DataSource4: TDataSource
    DataSet = DataModal1.QGzJrjb
    Left = 501
    Top = 176
  end
  object DataSource5: TDataSource
    Left = 503
    Top = 219
  end
end