u_log.dfm

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

        00FFFF00FFFF00FFFF00FFC58C70FBF7F4FFFFFFFFFFFFFFFFFFFFFFFFE5D5D5
        A4766A9A6862935F5B9E6A64BD988FE0C4B5FAE9D0E0D0BAB8AB9AA79C8BA497
        8680504BFF00FFFF00FFFF00FFFF00FFFF00FFCB9173FBF7F4FFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFEFBFCF7F0FBF2E9FBF2E5E9D3C49E675B98665B
        95655B96655B96655B986859FF00FFFF00FFFF00FFFF00FFFF00FFCF9674FBF7
        F6FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFCFAFCF7F0FFFAEFDA
        C0B69F675BDAA16BDD984FE2903AEA8923A5686BFF00FFFF00FFFF00FFFF00FF
        FF00FFD49875FCF8F6FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFCFBFFFEF7DDC4BC9F675BEAB474EFA952F6A036A5686BFF00FFFF00FFFF
        00FFFF00FFFF00FFFF00FFD49875FCF8F6FFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFDDC7C29F675BEAB273EFA751A5686BFF00
        FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFD49875FFFEFEFFFFFFFFFFFFFF
        FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFE2D0CE9F675BEDB572
        A5686BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFFF00FFCF8E68CF8E
        68CF8E68CF8E68CF8E68CF8E68CF8E68CF8E68CF8E68CF8E68CF8E68CF8E68CF
        8E689F675BA5686BFF00FFFF00FFFF00FFFF00FFFF00FFFF00FF}
    end
    object d1: TDateTimePicker
      Left = 88
      Top = 12
      Width = 89
      Height = 24
      Date = 37911.435679108800000000
      Time = 37911.435679108800000000
      TabOrder = 3
      OnExit = d1Exit
    end
    object d2: TDateTimePicker
      Left = 208
      Top = 12
      Width = 89
      Height = 24
      Date = 37911.437775879640000000
      Time = 37911.437775879640000000
      TabOrder = 4
      OnExit = d1Exit
    end
    object CheckBox1: TCheckBox
      Left = 22
      Top = 14
      Width = 57
      Height = 17
      Caption = #26085#26399#27573
      TabOrder = 5
    end
    object BitBtn4: TBitBtn
      Left = 636
      Top = 6
      Width = 75
      Height = 30
      Caption = #36864#20986
      TabOrder = 6
      OnClick = BitBtn4Click
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
        03333377777777777F333301BBBBBBBB033333773F3333337F3333011BBBBBBB
        0333337F73F333337F33330111BBBBBB0333337F373F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F337F33337F333301110BBBBB0333337F337FF3337F33330111B0BBBB
        0333337F337733337F333301110BBBBB0333337F337F33337F333301110BBBBB
        0333337F3F7F33337F333301E10BBBBB0333337F7F7F33337F333301EE0BBBBB
        0333337F777FFFFF7F3333000000000003333377777777777333}
      NumGlyphs = 2
    end
    object BitBtn5: TBitBtn
      Left = 560
      Top = 6
      Width = 75
      Height = 30
      Caption = 'TO EXCEL'
      TabOrder = 7
      OnClick = BitBtn5Click
    end
  end
  object DBGridEh1: TDBGridEh [1]
    Left = 0
    Top = 49
    Width = 1024
    Height = 672
    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
    ReadOnly = True
    SumList.Active = True
    TabOrder = 1
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -13
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnDrawColumnCell = DBGridEh1DrawColumnCell
    Columns = <
      item
        EditButtons = <>
        FieldName = 'Ucode'
        Footer.Value = #24635#35760#24405#25968#65306
        Footer.ValueType = fvtStaticText
        Footers = <>
        Width = 72
      end
      item
        EditButtons = <>
        FieldName = 'Computer'
        Footer.ValueType = fvtCount
        Footers = <>
        Width = 80
      end
      item
        EditButtons = <>
        FieldName = 'Title'
        Footers = <>
        Width = 100
      end
      item
        EditButtons = <>
        FieldName = 'Havedo'
        Footers = <>
        Width = 81
      end
      item
        EditButtons = <>
        FieldName = 'LoginTime'
        Footers = <>
      end
      item
        EditButtons = <>
        FieldName = 'LogoutTime'
        Footers = <>
      end
      item
        EditButtons = <>
        FieldName = 'Dotime'
        Footers = <>
      end>
  end
  inherited Q_main: TADOQuery
    CursorType = ctStatic
    SQL.Strings = (
      'Select * from TB_Sys_log where 1=1 Order by Dotime')
    object Q_mainSID: TGuidField
      FieldName = 'SID'
      FixedChar = True
      Size = 38
    end
    object Q_mainUcode: TStringField
      DisplayLabel = #29992#25143#36134#21495
      FieldName = 'Ucode'
      Size = 30
    end
    object Q_mainComputer: TStringField
      DisplayLabel = #35745#31639#26426#21517
      FieldName = 'Computer'
      Size = 50
    end
    object Q_mainTitle: TStringField
      DisplayLabel = #25805#20316#27169#22359
      FieldName = 'Title'
      Size = 100
    end
    object Q_mainHavedo: TStringField
      DisplayLabel = #21160#20316
      FieldName = 'Havedo'
      Size = 50
    end
    object Q_mainLoginTime: TDateTimeField
      DisplayLabel = #36827#20837#26102#38388
      FieldName = 'LoginTime'
    end
    object Q_mainLogoutTime: TDateTimeField
      DisplayLabel = #36864#20986#26102#38388
      FieldName = 'LogoutTime'
    end
    object Q_mainDotime: TDateTimeField
      DisplayLabel = #21160#20316#26102#38388
      FieldName = 'Dotime'
    end
  end
end