u_kqsource.dfm

超信人力资源管理系统,一个用Delphi编写的人事管理系统

inherited F_KQSource: TF_KQSource
  Left = 168
  Top = 171
  Width = 697
  Height = 428
  Caption = #32771#21220#21407#22987#35760#24405
  Color = clBtnFace
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 16
  object Panel1: TPanel [0]
    Left = 0
    Top = 0
    Width = 689
    Height = 89
    Align = alTop
    TabOrder = 0
    object Label1: TLabel
      Left = 16
      Top = 20
      Width = 39
      Height = 16
      Caption = #26085#26399#20174
    end
    object Label2: TLabel
      Left = 184
      Top = 20
      Width = 13
      Height = 16
      Caption = #21040
    end
    object Label3: TLabel
      Left = 360
      Top = 20
      Width = 35
      Height = 16
      Caption = #37096'   '#38376
    end
    object Label4: TLabel
      Left = 16
      Top = 60
      Width = 35
      Height = 16
      Caption = #24037'   '#21495
    end
    object Label5: TLabel
      Left = 173
      Top = 60
      Width = 38
      Height = 16
      Caption = #21345'    '#21495
    end
    object SpeedButton1: TSpeedButton
      Left = 568
      Top = 16
      Width = 23
      Height = 24
      Caption = '...'
      OnClick = SpeedButton1Click
    end
    object D1: TDateTimePicker
      Left = 64
      Top = 16
      Width = 96
      Height = 24
      Date = 37932.400113773150000000
      Time = 37932.400113773150000000
      TabOrder = 0
    end
    object D2: TDateTimePicker
      Left = 224
      Top = 16
      Width = 96
      Height = 24
      Date = 37932.400113773150000000
      Time = 37932.400113773150000000
      TabOrder = 1
    end
    object BitQuery: TBitBtn
      Left = 376
      Top = 56
      Width = 75
      Height = 25
      Caption = #26597#35810
      TabOrder = 2
      OnClick = BitQueryClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        33033333333333333F7F3333333333333000333333333333F777333333333333
        000333333333333F777333333333333000333333333333F77733333333333300
        033333333FFF3F777333333700073B703333333F7773F77733333307777700B3
        33333377333777733333307F8F8F7033333337F333F337F3333377F8F9F8F773
        3333373337F3373F3333078F898F870333337F33F7FFF37F333307F99999F703
        33337F377777337F3333078F898F8703333373F337F33373333377F8F9F8F773
        333337F3373337F33333307F8F8F70333333373FF333F7333333330777770333
        333333773FF77333333333370007333333333333777333333333}
      NumGlyphs = 2
    end
    object Bitprint: TBitBtn
      Left = 456
      Top = 56
      Width = 75
      Height = 25
      Caption = #25171#21360
      TabOrder = 3
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
        0003377777777777777308888888888888807F33333333333337088888888888
        88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
        8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
        8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
        03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
        03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
        33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
        33333337FFFF7733333333300000033333333337777773333333}
      NumGlyphs = 2
    end
    object Bitexit: TBitBtn
      Left = 536
      Top = 56
      Width = 75
      Height = 25
      Caption = #36864#20986
      TabOrder = 4
      OnClick = BitexitClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
        03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB
        0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB
        0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB
        0333337F777FFFFF7F3333000000000003333377777777777333}
      NumGlyphs = 2
    end
    object Edit1: TEdit
      Left = 64
      Top = 56
      Width = 96
      Height = 24
      TabOrder = 5
    end
    object Edit2: TEdit
      Left = 224
      Top = 56
      Width = 96
      Height = 24
      TabOrder = 6
    end
    object EDep: TEdit
      Left = 408
      Top = 16
      Width = 161
      Height = 24
      TabOrder = 7
    end
  end
  object DBGridEh1: TDBGridEh [1]
    Left = 0
    Top = 89
    Width = 689
    Height = 312
    Align = alClient
    DataSource = DS_main
    Flat = True
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -13
    FooterFont.Name = 'MS Sans Serif'
    FooterFont.Style = []
    FooterRowCount = 1
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        EditButtons = <>
        FieldName = 'Fdate'
        Footer.Value = #24635#25968
        Footer.ValueType = fvtStaticText
        Footers = <>
      end
      item
        EditButtons = <>
        FieldName = 'ICcardNO'
        Footer.ValueType = fvtCount
        Footers = <>
        Width = 70
      end
      item
        EditButtons = <>
        FieldName = 'Emp_id'
        Footers = <>
      end
      item
        Color = clInfoBk
        EditButtons = <>
        FieldName = 'Emp_name'
        Footers = <>
      end
      item
        EditButtons = <>
        FieldName = 'Emp_bmname'
        Footers = <>
      end
      item
        Color = clInfoBk
        EditButtons = <>
        FieldName = 'Ftime'
        Footers = <>
      end
      item
        EditButtons = <>
        FieldName = 'MachNO'
        Footers = <>
      end>
  end
  inherited Q_main: TADOQuery
    CursorType = ctStatic
    SQL.Strings = (
      'Select * from V_KQSource order by Fdate')
    Left = 472
    Top = 200
    object Q_mainFdate: TDateTimeField
      DisplayLabel = #26085#26399
      DisplayWidth = 13
      FieldName = 'Fdate'
    end
    object Q_mainICcardNO: TStringField
      DisplayLabel = #21345#21495
      DisplayWidth = 10
      FieldName = 'ICcardNO'
      Size = 10
    end
    object Q_mainEmp_id: TStringField
      DisplayLabel = #24037#21495
      DisplayWidth = 10
      FieldName = 'Emp_id'
      Size = 10
    end
    object Q_mainEmp_name: TStringField
      DisplayLabel = #22995#21517
      DisplayWidth = 11
      FieldName = 'Emp_name'
    end
    object Q_mainEmp_bmname: TStringField
      DisplayLabel = #37096#38376
      DisplayWidth = 12
      FieldName = 'Emp_bmname'
    end
    object Q_mainFtime: TDateTimeField
      DisplayLabel = #26102#38388
      DisplayWidth = 9
      FieldName = 'Ftime'
      DisplayFormat = 'HH:MM:SS'
    end
    object Q_mainMachNO: TStringField
      DisplayLabel = #26426#22120#21495
      DisplayWidth = 8
      FieldName = 'MachNO'
      Size = 2
    end
  end
  inherited Q_detail: TADOQuery
    Left = 40
    Top = 296
  end
  inherited DS_main: TDataSource
    Left = 512
    Top = 176
  end
  inherited DS_detail: TDataSource
    Left = 88
    Top = 296
  end
end