ding_gou_report_tong.dfm

采购管理系统：delphi+sql实现了企业采购自动化作业流程

        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = #35330#36092#26178#38291#33258
        Color = clWhite
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
      object QRLabel3: TQRLabel
        Left = 176
        Top = 56
        Width = 17
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          465.666666666667
          148.166666666667
          44.9791666666667)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = #21040
        Color = clWhite
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
      object QRLabel4: TQRLabel
        Left = 104
        Top = 56
        Width = 58
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          275.166666666667
          148.166666666667
          153.458333333333)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = 'QRLabel4'
        Color = clWhite
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
      object QRLabel5: TQRLabel
        Left = 200
        Top = 56
        Width = 58
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          529.166666666667
          148.166666666667
          153.458333333333)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = 'QRLabel5'
        Color = clWhite
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
      object QRLabel6: TQRLabel
        Left = 561
        Top = 56
        Width = 49
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          1484.3125
          148.166666666667
          129.645833333333)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = #21046#34920#20154
        Color = clWhite
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
      object QRLabel7: TQRLabel
        Left = 617
        Top = 56
        Width = 58
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          1632.47916666667
          148.166666666667
          153.458333333333)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = 'QRLabel7'
        Color = clWhite
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
      object QRShape1: TQRShape
        Left = 0
        Top = 78
        Width = 715
        Height = 1
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          2.64583333333333
          0
          206.375
          1891.77083333333)
        Pen.Width = 2
        Shape = qrsRectangle
        VertAdjust = 0
      end
      object QRShape5: TQRShape
        Left = 104
        Top = 73
        Height = 1
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          2.64583333333333
          275.166666666667
          193.145833333333
          171.979166666667)
        Shape = qrsRectangle
        VertAdjust = 0
      end
      object QRShape6: TQRShape
        Left = 199
        Top = 73
        Height = 1
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          2.64583333333333
          526.520833333333
          193.145833333333
          171.979166666667)
        Shape = qrsRectangle
        VertAdjust = 0
      end
      object QRLabel14: TQRLabel
        Left = 333
        Top = 59
        Width = 65
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          881.0625
          156.104166666667
          171.979166666667)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = 'QRLabel14'
        Color = clWhite
        Transparent = False
        WordWrap = True
        FontSize = 10
      end
    end
  end
  object sp1: TStoredProc
    Active = True
    DatabaseName = 'vvv'
    StoredProcName = 'ding_gou_report_tong;1'
    Left = 111
    Top = 312
    ParamData = <
      item
        DataType = ftInteger
        Name = 'RETURN_VALUE'
        ParamType = ptResult
        Value = 0
      end
      item
        DataType = ftDateTime
        Name = '@str1'
        ParamType = ptInput
      end
      item
        DataType = ftDateTime
        Name = '@str2'
        ParamType = ptInput
      end>
  end
  object DataSource1: TDataSource
    DataSet = sp1
    Left = 144
    Top = 344
  end
  object PrintDialog1: TPrintDialog
    Left = 240
    Top = 352
  end
  object sp2: TStoredProc
    Active = True
    DatabaseName = 'vvv'
    StoredProcName = 'ding_gou_report_tong_fei;1'
    Left = 96
    Top = 288
    ParamData = <
      item
        DataType = ftInteger
        Name = 'RETURN_VALUE'
        ParamType = ptResult
        Value = 0
      end
      item
        DataType = ftDateTime
        Name = '@str1'
        ParamType = ptInput
      end
      item
        DataType = ftDateTime
        Name = '@str2'
        ParamType = ptInput
      end>
  end
  object sp3: TStoredProc
    Active = True
    DatabaseName = 'vvv'
    StoredProcName = 'ding_gou_report_tong_hua;1'
    Left = 184
    Top = 288
    ParamData = <
      item
        DataType = ftInteger
        Name = 'RETURN_VALUE'
        ParamType = ptResult
        Value = 0
      end
      item
        DataType = ftDateTime
        Name = '@str1'
        ParamType = ptInput
      end
      item
        DataType = ftDateTime
        Name = '@str2'
        ParamType = ptInput
      end>
  end
  object sp4: TStoredProc
    Active = True
    DatabaseName = 'vvv'
    StoredProcName = 'ding_gou_report_tong_mu;1'
    Left = 280
    Top = 280
    ParamData = <
      item
        DataType = ftInteger
        Name = 'RETURN_VALUE'
        ParamType = ptResult
        Value = 0
      end
      item
        DataType = ftDateTime
        Name = '@str1'
        ParamType = ptInput
      end
      item
        DataType = ftDateTime
        Name = '@str2'
        ParamType = ptInput
      end>
  end
  object sp5: TStoredProc
    Active = True
    DatabaseName = 'vvv'
    StoredProcName = 'ding_gou_report_tong_jin;1'
    Left = 344
    Top = 272
    ParamData = <
      item
        DataType = ftInteger
        Name = 'RETURN_VALUE'
        ParamType = ptResult
        Value = 0
      end
      item
        DataType = ftDateTime
        Name = '@str1'
        ParamType = ptInput
      end
      item
        DataType = ftDateTime
        Name = '@str2'
        ParamType = ptInput
      end>
  end
  object sp6: TStoredProc
    Active = True
    DatabaseName = 'vvv'
    StoredProcName = 'ding_gou_report_tong_pei;1'
    Left = 416
    Top = 272
    ParamData = <
      item
        DataType = ftInteger
        Name = 'RETURN_VALUE'
        ParamType = ptResult
        Value = 0
      end
      item
        DataType = ftDateTime
        Name = '@str1'
        ParamType = ptInput
      end
      item
        DataType = ftDateTime
        Name = '@str2'
        ParamType = ptInput
      end>
  end
  object sp7: TStoredProc
    Active = True
    DatabaseName = 'vvv'
    StoredProcName = 'ding_gou_report_tong_ji;1'
    Left = 472
    Top = 272
    ParamData = <
      item
        DataType = ftInteger
        Name = 'RETURN_VALUE'
        ParamType = ptResult
        Value = 0
      end
      item
        DataType = ftDateTime
        Name = '@str1'
        ParamType = ptInput
      end
      item
        DataType = ftDateTime
        Name = '@str2'
        ParamType = ptInput
      end>
  end
  object sp8: TStoredProc
    Active = True
    DatabaseName = 'vvv'
    StoredProcName = 'ding_gou_report_tong_chuan;1'
    Left = 544
    Top = 272
    ParamData = <
      item
        DataType = ftInteger
        Name = 'RETURN_VALUE'
        ParamType = ptResult
        Value = 0
      end
      item
        DataType = ftDateTime
        Name = '@str1'
        ParamType = ptInput
      end
      item
        DataType = ftDateTime
        Name = '@str2'
        ParamType = ptInput
      end>
  end
end