sys_qry_userconnectiontime.dfm

一个MRPII系统源代码版本

inherited Frm_Sys_Qry_UserConnectionTime: TFrm_Sys_Qry_UserConnectionTime
  Left = 276
  Top = 141
  Caption = #31995#32479#29992#25143#25968#25454#36830#25509#26102#38388#26597#35810
  PixelsPerInch = 96
  TextHeight = 12
  inherited Pnl_Title: TPanel
    Caption = #31995#32479#29992#25143#25968#25454#36830#25509#26102#38388#26597#35810
  end
  inherited Pnl_Head: TPanel
    inherited Lbl_Condition: TLabel
      Width = 24
      Caption = #20840#37096
    end
    inherited Lbl_Order: TLabel
      Width = 72
      Caption = #36830#25509#24320#22987#26102#38388
    end
  end
  inherited Pnl_Body: TPanel
    inherited DBGridEh: TDBGridEh
      Columns = <
        item
          EditButtons = <>
          FieldName = 'EmployeeCode'
          Footers = <>
          Title.Caption = #25805#20316#21592#20195#30721
          Visible = False
        end
        item
          EditButtons = <>
          FieldName = 'EmployeeB'
          Footers = <>
          Title.Caption = #25805#20316#21592#26631#35782
          Width = 293
        end
        item
          EditButtons = <>
          FieldName = 'Starttime'
          Footers = <>
          Title.Caption = #36830#25509#24320#22987#26102#38388
          Width = 181
        end
        item
          EditButtons = <>
          FieldName = 'endtime'
          Footers = <>
          Title.Caption = #36830#25509#32467#26463#26102#38388
          Width = 184
        end
        item
          EditButtons = <>
          FieldName = 'Difftime'
          Footers = <>
          Title.Caption = #36830#36890#25152#32791#26102#38388
          Width = 105
        end>
    end
  end
  inherited AdoQry_Main: TADOQuery
    SQL.Strings = (
      'select UserConnectionTime.EmployeeCode,'
      
        '       UserConnectionTime.EmployeeCode+'#39' '#39'+Employee.EmployeeName' +
        ' as EmployeeB,'
      '       UserConnectionTime.Starttime,'
      '       UserConnectionTime.endtime, '
      '       UserConnectionTime.Difftime'
      'from UserConnectionTime'
      
        'join Employee on UserConnectionTime.EmployeeCode=Employee.employ' +
        'eeCode')
    Top = 241
    object AdoQry_MainEmployeeCode: TStringField
      FieldName = 'EmployeeCode'
      Origin = 'UserConnectionTime'
      Size = 30
    end
    object AdoQry_MainEmployeeB: TStringField
      FieldName = 'EmployeeB'
      ReadOnly = True
      Size = 91
    end
    object AdoQry_MainStarttime: TDateTimeField
      FieldName = 'Starttime'
      Origin = 'UserConnectionTime'
      DisplayFormat = 'yyyy.mm.dd hh:nn:ss.zzz'
    end
    object AdoQry_Mainendtime: TDateTimeField
      FieldName = 'endtime'
      Origin = 'UserConnectionTime'
      DisplayFormat = 'yyyy.mm.dd hh:nn:ss.zzz'
    end
    object AdoQry_MainDifftime: TDateTimeField
      FieldName = 'Difftime'
      Origin = 'UserConnectionTime'
      DisplayFormat = 'nn:ss.zzz'
    end
  end
  inherited DataSource: TDataSource
    Left = 352
    Top = 137
  end
end