tas410_01.dfm.svn-base

这是一个功能齐全的,代码完整的ERP企业信息管理系统,现在上传和大家分享

        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FFinish3'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FPercent3'
        Attributes = [faFixed]
        DataType = ftFloat
      end
      item
        Name = 'FTotal4'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FFinish4'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FPercent4'
        Attributes = [faFixed]
        DataType = ftFloat
      end
      item
        Name = 'FTotal5'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FFinish5'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FPercent5'
        Attributes = [faFixed]
        DataType = ftFloat
      end
      item
        Name = 'FTotal6'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FFinish6'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FPercent6'
        Attributes = [faFixed]
        DataType = ftFloat
      end
      item
        Name = 'FTotal7'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FFinish7'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FPercent7'
        Attributes = [faFixed]
        DataType = ftFloat
      end
      item
        Name = 'FTotal8'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FFinish8'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FPercent8'
        Attributes = [faFixed]
        DataType = ftFloat
      end
      item
        Name = 'FTotal9'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FFinish9'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FPercent9'
        Attributes = [faFixed]
        DataType = ftFloat
      end
      item
        Name = 'FTotal10'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FFinish10'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FPercent10'
        Attributes = [faFixed]
        DataType = ftFloat
      end
      item
        Name = 'FTotal11'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FFinish11'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FPercent11'
        Attributes = [faFixed]
        DataType = ftFloat
      end
      item
        Name = 'FTotal12'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FFinish12'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FPercent12'
        Attributes = [faFixed]
        DataType = ftFloat
      end
      item
        Name = 'FTotal'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FFinish'
        Attributes = [faFixed]
        DataType = ftInteger
      end
      item
        Name = 'FPercent'
        Attributes = [faFixed]
        DataType = ftFloat
      end>
    StoreDefs = True
    object ADODataSet1FNo: TIntegerField
      FieldName = 'FNo'
      Visible = False
    end
    object ADODataSet1FName: TStringField
      DisplayLabel = #21517#31216
      FieldName = 'FName'
      Size = 50
    end
    object ADODataSet1FParent: TIntegerField
      FieldName = 'FParent'
      Visible = False
    end
    object ADODataSet1FTotal1: TIntegerField
      DisplayLabel = #26381#21153#24635#25968
      FieldName = 'FTotal1'
    end
    object ADODataSet1FFinish1: TIntegerField
      DisplayLabel = #24050#23436#25104#25968
      FieldName = 'FFinish1'
    end
    object ADODataSet1FPercent1: TFloatField
      DisplayLabel = #23436#25104#27604#29575
      FieldName = 'FPercent1'
      DisplayFormat = '0.00%'
    end
    object ADODataSet1FTotal2: TIntegerField
      DisplayLabel = #26381#21153#24635#25968
      FieldName = 'FTotal2'
    end
    object ADODataSet1FFinish2: TIntegerField
      DisplayLabel = #24050#23436#25104#25968
      FieldName = 'FFinish2'
    end
    object ADODataSet1FPercent2: TFloatField
      DisplayLabel = #23436#25104#27604#29575
      FieldName = 'FPercent2'
      DisplayFormat = '0.00%'
    end
    object ADODataSet1FTotal3: TIntegerField
      DisplayLabel = #26381#21153#24635#25968
      FieldName = 'FTotal3'
    end
    object ADODataSet1FFinish3: TIntegerField
      DisplayLabel = #24050#23436#25104#25968
      FieldName = 'FFinish3'
    end
    object ADODataSet1FPercent3: TFloatField
      DisplayLabel = #23436#25104#27604#29575
      FieldName = 'FPercent3'
      DisplayFormat = '0.00%'
    end
    object ADODataSet1FTotal4: TIntegerField
      DisplayLabel = #26381#21153#24635#25968
      FieldName = 'FTotal4'
    end
    object ADODataSet1FFinish4: TIntegerField
      DisplayLabel = #24050#23436#25104#25968
      FieldName = 'FFinish4'
    end
    object ADODataSet1FPercent4: TFloatField
      DisplayLabel = #23436#25104#27604#29575
      FieldName = 'FPercent4'
      DisplayFormat = '0.00%'
    end
    object ADODataSet1FTotal5: TIntegerField
      DisplayLabel = #26381#21153#24635#25968
      FieldName = 'FTotal5'
    end
    object ADODataSet1FFinish5: TIntegerField
      DisplayLabel = #24050#23436#25104#25968
      FieldName = 'FFinish5'
    end
    object ADODataSet1FPercent5: TFloatField
      DisplayLabel = #23436#25104#27604#29575
      FieldName = 'FPercent5'
      DisplayFormat = '0.00%'
    end
    object ADODataSet1FTotal6: TIntegerField
      DisplayLabel = #26381#21153#24635#25968
      FieldName = 'FTotal6'
    end
    object ADODataSet1FFinish6: TIntegerField
      DisplayLabel = #24050#23436#25104#25968
      FieldName = 'FFinish6'
    end
    object ADODataSet1FPercent6: TFloatField
      DisplayLabel = #23436#25104#27604#29575
      FieldName = 'FPercent6'
      DisplayFormat = '0.00%'
    end
    object ADODataSet1FTotal7: TIntegerField
      DisplayLabel = #26381#21153#24635#25968
      FieldName = 'FTotal7'
    end
    object ADODataSet1FFinish7: TIntegerField
      DisplayLabel = #24050#23436#25104#25968
      FieldName = 'FFinish7'
    end
    object ADODataSet1FPercent7: TFloatField
      DisplayLabel = #23436#25104#27604#29575
      FieldName = 'FPercent7'
      DisplayFormat = '0.00%'
    end
    object ADODataSet1FTotal8: TIntegerField
      DisplayLabel = #26381#21153#24635#25968
      FieldName = 'FTotal8'
    end
    object ADODataSet1FFinish8: TIntegerField
      DisplayLabel = #24050#23436#25104#25968
      FieldName = 'FFinish8'
    end
    object ADODataSet1FPercent8: TFloatField
      DisplayLabel = #23436#25104#27604#29575
      FieldName = 'FPercent8'
      DisplayFormat = '0.00%'
    end
    object ADODataSet1FTotal9: TIntegerField
      DisplayLabel = #26381#21153#24635#25968
      FieldName = 'FTotal9'
    end
    object ADODataSet1FFinish9: TIntegerField
      DisplayLabel = #24050#23436#25104#25968
      FieldName = 'FFinish9'
    end
    object ADODataSet1FPercent9: TFloatField
      DisplayLabel = #23436#25104#27604#29575
      FieldName = 'FPercent9'
      DisplayFormat = '0.00%'
    end
    object ADODataSet1FTotal10: TIntegerField
      DisplayLabel = #26381#21153#24635#25968
      FieldName = 'FTotal10'
    end
    object ADODataSet1FFinish10: TIntegerField
      DisplayLabel = #24050#23436#25104#25968
      FieldName = 'FFinish10'
    end
    object ADODataSet1FPercent10: TFloatField
      DisplayLabel = #23436#25104#27604#29575
      FieldName = 'FPercent10'
      DisplayFormat = '0.00%'
    end
    object ADODataSet1FTotal11: TIntegerField
      DisplayLabel = #26381#21153#24635#25968
      FieldName = 'FTotal11'
    end
    object ADODataSet1FFinish11: TIntegerField
      DisplayLabel = #24050#23436#25104#25968
      FieldName = 'FFinish11'
    end
    object ADODataSet1FPercent11: TFloatField
      DisplayLabel = #23436#25104#27604#29575
      FieldName = 'FPercent11'
      DisplayFormat = '0.00%'
    end
    object ADODataSet1FTotal12: TIntegerField
      DisplayLabel = #26381#21153#24635#25968
      FieldName = 'FTotal12'
    end
    object ADODataSet1FFinish12: TIntegerField
      DisplayLabel = #24050#23436#25104#25968
      FieldName = 'FFinish12'
    end
    object ADODataSet1FPercent12: TFloatField
      DisplayLabel = #23436#25104#27604#29575
      FieldName = 'FPercent12'
      DisplayFormat = '0.00%'
    end
    object ADODataSet1FTotal: TIntegerField
      DisplayLabel = #26381#21153#24635#25968
      FieldName = 'FTotal'
    end
    object ADODataSet1FFinish: TIntegerField
      DisplayLabel = #24050#23436#25104#25968
      FieldName = 'FFinish'
    end
    object ADODataSet1FPercent: TFloatField
      DisplayLabel = #23436#25104#27604#29575
      FieldName = 'FPercent'
      DisplayFormat = '0.00%'
    end
  end
  object ADOQuery1: TADOQuery [9]
    Connection = SYSDM.ADOC
    Parameters = <>
    SQL.Strings = (
      'select count(T510_001) as FTotal,month(T510_006) as FMonth'
      '  from TAS510 where year(T510_006)=2005'
      '  group by month(T510_006)')
    Left = 336
    Top = 144
  end
  object ADOQuery2: TADOQuery [10]
    Connection = SYSDM.ADOC
    Parameters = <>
    SQL.Strings = (
      'select count(T510_001) as FFinish,month(T510_006) as FMonth'
      '  from TAS510 where T510_003=3 and year(T510_006)=2005'
      '  group by month(T510_006)')
    Left = 376
    Top = 144
  end
  inherited pmGrid: TPopupMenu [11]
  end
  object PopupMenu1: TPopupMenu
    Left = 72
    Top = 216
    object N1: TMenuItem
      Action = ActOpen
    end
    object N2: TMenuItem
      Caption = '-'
    end
    object N4: TMenuItem
      Action = ActLocate
    end
    object N5: TMenuItem
      Action = ActSearch
    end
  end
end