frm_k_sgqdpas.dfm

来自「是一个用delphi设计的考勤系统」· DFM 代码 · 共 937 行 · 第 1/3 页

DFM
937 行
字号
          CCCCCCCCCCCCCCCBCBCBC9C9C9C7C7C7C5C5C5C3C3C3C2C2C2C1C1C1C0C0C0C0
          C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0C0C0C0C0C0C0C1C1
          C1C3C3C3C6C6C6C9C9C9CDCDCDD1D1D1D5D5D5D7D7D7D9D9D9DADADAD9D9D9D7
          D7D7D5D5D5D1D1D1CDCDCDC9C9C9C6C6C6C3C3C3C1C1C1C0C0C0C0C0C0C0C0C0
          C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0C1C1C1C2C2C2C4C4C4C8C8C8CDCDCDD3
          D3D3DADADAE0E0E0E5E5E5E9E9E9EBEBEBECECECEBEBEBE9E9E9E5E5E5E0E0E0
          DADADAD3D3D3CDCDCDC8C8C8C4C4C4C2C2C2C1C1C1C0C0C0C0C0C0C0C0C0C0C0
          C000C0C0C0C1C1C1C2C2C2C5C5C5CACACAD1D1D1D9D9D9E2E2E2EBE8E4EBDBC5
          E3C9A3D5B382C59E66BA9156B89461BEA179CBB597D9CDBDE7E5E2E2E2E2D9D9
          D9D1D1D1CACACAC5C5C5C2C2C2C1C1C1C0C0C0C0C0C0C0C0C000C0C0C0C2C2C2
          C5C5C5CBCBCBD3D3D3DDDDDDE9E9E9F0DEC2EBC692DBAA64D2A25EC99B57C294
          53BA8E50B2884DAA834AA47F499F7B49B69D7BD3C6B4E9E9E9DDDDDDD3D3D3CB
          CBCBC5C5C5C2C2C2C0C0C0C0C0C0C0C0C000C1C1C1C4C4C4CACACAD3D3D3DEDE
          DEEDE7DEF6D8AEEFBB6FE7B166DFAA5FD6A258CF9C53C6944FBE8F4CB68949B0
          8446A77E449F7A449A7644987646C2B096E2DED9DEDEDED3D3D3CACACAC4C4C4
          C1C1C1C0C0C0C0C0C000C3C3C3C8C8C8D1D1D1DDDDDDEDE7DEF6D6A7F3BC6FF2
          B969EBB260E3AA5ADCA454D49D4FCD974BC69248BE8C45B68744AD8142A47B41
          9D7640967341947243BBA78AE2DED9DDDDDDD1D1D1C8C8C8C3C3C3C1C1C1C0C0
          C000C6C6C6CDCDCDD9D9D9E9E9E9F6D9AFF3BD70F2BA6AF2B663F0B35DE8AC56
          E2A650DAA04CD49A48CD9646C79144BF8C42B58540AC7F40A2793E9A743E9471
          40917042C0AE95E9E9E9D9D9D9CDCDCDC6C6C6C2C2C2C0C0C000C9C9C9D3D3D3
          E2E2E2F4E1C5F3C075F2BB6DF2B764EAAF5B9D73392F200E0C0602E1A249DB9E
          46D69945D09643C89141BF8B40B5853E07020044311899733E92703F927244D1
          C4B3E2E2E2D3D3D3C9C9C9C3C3C3C0C0C000CDCDCDDADADAECE9E5F6D19BF3BD
          71F2B967E9B0654835660100AD0000CC0702000C0602E2A145DE9E44D99B42D3
          9641CA91400000D103017E07020033241296713D917040AF9777E7E5E2DADADA
          CDCDCDC5C5C5C1C1C100D1D1D1E0E0E0F4E3CBF4BF76F3BC6EF1B8666E529D00
          00D10000D10000D10000CC0702000C0602E5A243E19F42DB9C410000CA0000D1
          0000D102019422170B9B743E95723F937243D5CBBBE0E0E0D1D1D1C7C7C7C2C2
          C200D5D5D5E5E5E5F7DAB1F3BF74F3BB6BF2B762F1B35A0000D10000D10000D1
          0000D10000CC0702000C0602E8A3420000D10000D10000D10000D10D08B0AA7D
          3CA3793E9B753F967443C2AF93E5E5E5D5D5D5C9C9C9C2C2C200D7D7D7E9E9E9
          F7CF98F3BE72F3BA6AF2B762F1B35AF0AF530000D10000D10000D10000D10000
          CC0702000000D10000D10000D10000D1140E88BD8942B5853EA97E3FA079409A
          7643B19673E9E9E9D7D7D7CBCBCBC3C3C300D9D9D9EBEBEBF5C785F3BE73F2BA
          6AF2B661F1B259F0AF52F0AD4D0000D10000D10000D10000D10000CF0000D100
          00D10000D10200A0D39640C89040BB8940B08240A67D429E7945A58558EBEBEB
          D9D9D9CCCCCCC4C4C400DADADAECECECF4C27CF3BE73F2BA6BF2B661F1B35AF1
          AF53F0AD4DEFAA490000D10000D10000D10000D10000D10000D10000D1E09E42
          D89A42CC9242C08C42B58642AC8145A47E47A37F4CECECECDADADACCCCCCC4C4
          C400D9D9D9EBEBEBF5C787F3BE75F2BB6CF2B762F1B35BF1B054F0AD4EEFAA49
          38260F0000D10000D10000D10000D10000D10702000B0501DA9C42D09643C58F
          43BB8A44B28547AB834AB08E5DEBEBEBD9D9D9CCCCCCC4C4C400D7D7D7E9E9E9
          F7D19AF3C077F3BC6EF2B866F1B55EF1B157EBAA4E150EAA0000D10000D10000
          D10000D10000D10000D10000CD0702000C0602D39845C99446C08E48B88A4BB1
          884DC2A47AE9E9E9D7D7D7CBCBCBC3C3C300D4D4D4E5E5E5F7DBB2F4C179F3BD
          71F2BA69F2B661EBAE5C1912890000D10000D10000D10000D10000D10000D100
          00D10000D10000CC0702000C0602CE974AC6944CBE904EB98E52D3BD9CE5E5E5
          D4D4D4C9C9C9C2C2C200D1D1D1DFDFDFF3E6D4F4C37DF3BF75F2BB6DF2B8651B
          14A50000D10000D10000D10000D1EFAB4AEFAA470000D10000D10000D10000D1
          0000CC070200080300CA9851C39554C09558E5DACADFDFDFD1D1D1C7C7C7C2C2
          C200CDCDCDD9D9D9EAE9E7F7D3A0F3C179F3BD716750A50000D10000D10000D1
          0000CBF0AD4FF0AD4EF0AC4CF0AC4C0000D10000D10000D10000D10000D08361
          32D29F57CA9C5AD6B688E9E8E6D9D9D9CDCDCDC5C5C5C1C1C100C9C9C9D3D3D3
          E1E1E1F3E6D5F4C37EF3C077DDAC792019C30000D10000D1F1B259F1B056F0B0
          54F0AF52F0AF51F0AE520000D10101D10201AD553F75DEA85BD7A65DD3A562EA
          DECDE1E1E1D3D3D3C9C9C9C3C3C3C0C0C000C5C5C5CDCDCDD8D8D8E7E7E7F6E0
          C0F4C27CF3BF77D3A47D2019C3F2B865F2B661F2B45EF1B35AF0B257F0B258F1
          B258F1B25A0504CF936F8BEBB260E4AE63DEAC65EAD4B5E7E7E7D8D8D8CDCDCD
          C5C5C5C1C1C1C0C0C000C3C3C3C8C8C8D0D0D0DBDBDBEAE8E5F7DEBAF4C27CF3
          C077F3BE72F3BB6CF2B968F2B764F2B762F2B560F1B660F1B560F1B561F2B762
          F2B866F0B969EAB56BEFD5B1E9E7E4DBDBDBD0D0D0C8C8C8C3C3C3C1C1C1C0C0
          C000C1C1C1C4C4C4C9C9C9D1D1D1DCDCDCE9E8E6F5E2C6F4C37DF4C179F3BE74
          F3BD70F3BC6DF3BA6AF3B967F3B967F2B968F2BA69F2BA6AF3BC6DF3BE72F4DF
          C1E9E8E5DCDCDCD1D1D1C9C9C9C4C4C4C1C1C1C0C0C0C0C0C000C0C0C0C2C2C2
          C4C4C4CACACAD1D1D1DADADAE5E5E5F2E9DCF7D9B0F4C27BF4C078F3BF75F3BE
          72F3BE71F3BD6FF2BC70F3BD71F3BE73F7D7ABF1E8DBE5E5E5DADADAD1D1D1CA
          CACAC4C4C4C2C2C2C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0C2C2C2C4C4C4C9C9
          C9CFCFCFD6D6D6DFDFDFE8E7E7F0EBE2F6E5CDF7D9AFF6CB8FF4C179F6CA8DF7
          D9ACF6E4CBF0EAE1E8E7E7DFDFDFD6D6D6CFCFCFC9C9C9C4C4C4C2C2C2C0C0C0
          C0C0C0C0C0C0C0C0C000C0C0C0C0C0C0C0C0C0C2C2C2C4C4C4C7C7C7CBCBCBD1
          D1D1D7D7D7DDDDDDE2E2E2E6E6E6E9E9E9EAEAEAE9E9E9E6E6E6E2E2E2DDDDDD
          D7D7D7D1D1D1CBCBCBC7C7C7C4C4C4C2C2C2C0C0C0C0C0C0C0C0C0C0C0C0C0C0
          C000C0C0C0C0C0C0C0C0C0C0C0C0C1C1C1C2C2C2C5C5C5C8C8C8CBCBCBCFCFCF
          D3D3D3D5D5D5D7D7D7D8D8D8D7D7D7D5D5D5D3D3D3CFCFCFCBCBCBC8C8C8C5C5
          C5C2C2C2C1C1C1C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C0C000}
        OnClick = BtnExitClick
      end
      object LBtnExit: TLabelB
        Left = 246
        Top = 157
        Width = 26
        Height = 13
        Cursor = crHandPoint
        Caption = #21462#28040
        Font.Charset = GB2312_CHARSET
        Font.Color = clBlue
        Font.Height = -13
        Font.Name = #23435#20307
        Font.Style = [fsUnderline]
        ParentFont = False
        Transparent = True
        OnClick = BtnExitClick
      end
      object chk1: TCheckBox
        Left = 20
        Top = 10
        Width = 23
        Height = 18
        TabOrder = 0
        OnClick = chk1Click
      end
      object Edit1: TEdit
        Left = 117
        Top = 7
        Width = 173
        Height = 24
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        ImeMode = imClose
        ParentFont = False
        TabOrder = 1
      end
      object GroupBox3: TGroupBox
        Left = 5
        Top = 69
        Width = 291
        Height = 74
        Caption = '    '#26085#26399#36873#25321
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TabOrder = 2
        object Label6: TLabel
          Left = 133
          Top = 35
          Width = 24
          Height = 16
          Caption = '-->'
        end
        object dtp1: TDateTimePicker
          Left = 11
          Top = 30
          Width = 122
          Height = 24
          Date = 36761.906077314800000000
          Time = 36761.906077314800000000
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -16
          Font.Name = #23435#20307
          Font.Style = []
          ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
          ParentFont = False
          TabOrder = 0
        end
        object dtp2: TDateTimePicker
          Left = 158
          Top = 30
          Width = 123
          Height = 24
          Date = 36761.906077314800000000
          Time = 36761.906077314800000000
          Font.Charset = GB2312_CHARSET
          Font.Color = clWindowText
          Font.Height = -16
          Font.Name = #23435#20307
          Font.Style = []
          ImeName = #29579#30721#20116#31508#22411#36755#20837#27861'86'#29256
          ParentFont = False
          TabOrder = 1
        end
      end
      object chk3: TCheckBox
        Left = 20
        Top = 67
        Width = 23
        Height = 19
        TabOrder = 3
      end
      object chk2: TCheckBox
        Left = 20
        Top = 38
        Width = 23
        Height = 18
        TabOrder = 4
      end
      object yhxm: TEdit
        Left = 117
        Top = 38
        Width = 174
        Height = 24
        Font.Charset = GB2312_CHARSET
        Font.Color = clWindowText
        Font.Height = -16
        Font.Name = #23435#20307
        Font.Style = []
        ImeMode = imClose
        ParentFont = False
        TabOrder = 5
      end
    end
  end
  object BitBtn1: TBitBtn
    Left = 24
    Top = 16
    Width = 81
    Height = 25
    Caption = #25163#24037#31614#21040
    TabOrder = 5
    OnClick = BitBtn1Click
  end
  object BitBtn3: TBitBtn
    Left = 120
    Top = 16
    Width = 75
    Height = 25
    Caption = #26597#35810
    TabOrder = 6
    OnClick = BitBtn3Click
  end
  object Dkqjl: TDataSource
    DataSet = Qrysgqd
    Left = 291
    Top = 16
  end
  object Dyhxx: TDataSource
    DataSet = Qyhxx
    Left = 235
    Top = 16
  end
  object Qyhxx: TADOQuery
    Connection = WindData.AdoConn
    Parameters = <>
    SQL.Strings = (
      'select yhbh,yhxm from zx_s_yhxx'
      '  order by yhbh')
    Left = 264
    Top = 16
  end
  object Qrysgqd: TADOQuery
    Connection = WindData.AdoConn
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'select yhbh,yhxm,jlrq,jlsj,bmbh,bmmc from vkq_kqjlcur')
    Left = 320
    Top = 16
  end
  object pkq_A_Sgqd: TADOStoredProc
    Connection = WindData.AdoConn
    ProcedureName = 'pkq_A_Sgqd'
    Parameters = <
      item
        Name = '@RETURN_VALUE'
        DataType = ftInteger
        Direction = pdReturnValue
        Precision = 10
        Value = Null
      end
      item
        Name = '@cs'
        Attributes = [paNullable]
        DataType = ftString
        Size = 1
        Value = Null
      end
      item
        Name = '@csz'
        Attributes = [paNullable]
        DataType = ftString
        Size = 20
        Value = Null
      end
      item
        Name = '@kqrq'
        Attributes = [paNullable]
        DataType = ftString
        Size = 10
        Value = Null
      end
      item
        Name = '@kqsj'
        Attributes = [paNullable]
        DataType = ftString
        Size = 8
        Value = Null
      end
      item
        Name = '@qdlb'
        Attributes = [paNullable]
        DataType = ftString
        Size = 1
        Value = Null
      end
      item
        Name = '@bc'
        Attributes = [paNullable]
        DataType = ftInteger
        Precision = 10
        Value = Null
      end
      item
        Name = '@Retmsg'
        Attributes = [paNullable]
        DataType = ftString
        Direction = pdInputOutput
        Size = 100
        Value = Null
      end>
    Left = 344
    Top = 16
  end
end

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?