inv_opout_pi.dfm

一个MRPII系统源代码版本

inherited Frm_Inv_OpOut_Pi: TFrm_Inv_OpOut_Pi
  Left = 305
  Top = 187
  BOrderIcons = [biSystemMenu, biMaximize, biHelp]
  Caption = #24211#23384' '#22996#22806#20986#24211#21333
  ClientHeight = 429
  ClientWidth = 772
  Scaled = False
  PixelsPerInch = 96
  TextHeight = 12
  object QuickRep1: TQuickRep [0]
    Left = 8
    Top = 8
    Width = 794
    Height = 352
    Frame.Color = clBlack
    Frame.DrawTop = False
    Frame.DrawBottom = False
    Frame.DrawLeft = False
    Frame.DrawRight = False
    DataSet = AdoQry_Line
    Font.ChArset = ANSI_CHArSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = #23435#20307
    Font.Style = [fsBold]
    Functions.Strings = (
      'PAGENUMBER'
      'COLUMNNUMBER'
      'ReportTITLE')
    Functions.DATA = (
      '0'
      '0'
      #39#39)
    Options = [FirstPageHeader, LastPageFooter]
    Page.Columns = 1
    Page.Orientation = poPortrait
    Page.PAperSize = Custom
    Page.Values = (
      0.000000000000000000
      931.000000000000000000
      0.000000000000000000
      2100.000000000000000000
      100.000000000000000000
      100.000000000000000000
      0.000000000000000000)
    PrinterSettings.Copies = 1
    PrinterSettings.Duplex = False
    PrinterSettings.FirstPage = 0
    PrinterSettings.LastPage = 0
    PrinterSettings.OutputBin = Auto
    PrintIfEmpty = False
    SnApToGrid = True
    Units = MM
    Zoom = 100
    object DetailBand1: TQRBand
      Left = 38
      Top = 88
      Width = 718
      Height = 14
      Frame.Color = clBlack
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      AlignToBottom = False
      Color = clWhite
      ForceNewColumn = False
      ForceNewPage = False
      Size.Values = (
        37.041666666666670000
        1899.708333333333000000)
      BandType = rbDetail
      object Label3: TLabel
        Left = 368
        Top = 24
        Width = 7
        Height = 12
      end
      object QRDBText9: TQRDBText
        Left = 5
        Top = 1
        Width = 50
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.979166666666700000
          13.229166666666700000
          2.645833333333330000
          132.291666666667000000)
        Alignment = taCenter
        AlignToBand = False
        AutoSize = False
        AutoStretch = False
        Color = clWhite
        DataSet = AdoQry_Line
        DataField = 'POLineNo'
        Font.ChArset = GB2312_CHArSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TransParent = False
        WordWrAp = True
        FontSize = 9
      end
      object QRDBText10: TQRDBText
        Left = 62
        Top = 1
        Width = 69
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.979166666666700000
          164.041666666667000000
          2.645833333333330000
          182.562500000000000000)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = False
        AutoStretch = False
        Color = clWhite
        DataSet = AdoQry_Line
        DataField = 'ItemCode'
        Font.ChArset = GB2312_CHArSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TransParent = False
        WordWrAp = True
        FontSize = 9
      end
      object QRDBText12: TQRDBText
        Left = 599
        Top = 0
        Width = 39
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.979166666666700000
          1584.854166666670000000
          0.000000000000000000
          103.187500000000000000)
        Alignment = taCenter
        AlignToBand = False
        AutoSize = False
        AutoStretch = False
        Color = clWhite
        DataSet = AdoQry_Line
        DataField = 'UomName'
        Font.ChArset = GB2312_CHArSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        ParentFont = False
        TransParent = False
        WordWrAp = True
        FontSize = 9
      end
      object QRDBText13: TQRDBText
        Left = 647
        Top = 1
        Width = 66
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.979166666666700000
          1711.854166666670000000
          2.645833333333330000
          174.625000000000000000)
        Alignment = tArightJustify
        AlignToBand = False
        AutoSize = False
        AutoStretch = False
        Color = clWhite
        DataSet = AdoQry_Line
        DataField = 'InvBillQty'
        Font.ChArset = GB2312_CHArSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        OnPrint = QRDBText13Print
        ParentFont = False
        TransParent = False
        WordWrAp = True
        FontSize = 9
      end
      object QRShApe10: TQRShApe
        Left = 56
        Top = -23
        Width = 3
        Height = 68
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          179.916666666667000000
          148.166666666667000000
          -60.854166666666700000
          7.937500000000000000)
        ShApe = qrsVertLine
      end
      object QRShApe2: TQRShApe
        Left = -1
        Top = -23
        Width = 3
        Height = 68
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          179.916666666667000000
          -2.645833333333330000
          -60.854166666666700000
          7.937500000000000000)
        ShApe = qrsVertLine
      end
      object QRShApe6: TQRShApe
        Left = 134
        Top = -23
        Width = 3
        Height = 68
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          179.916666666667000000
          354.541666666667000000
          -60.854166666666700000
          7.937500000000000000)
        ShApe = qrsVertLine
      end
      object QRShApe7: TQRShApe
        Left = 591
        Top = -23
        Width = 3
        Height = 68
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          179.916666666667000000
          1563.687500000000000000
          -60.854166666666700000
          7.937500000000000000)
        ShApe = qrsVertLine
      end
      object QRShApe8: TQRShApe
        Left = 641
        Top = -23
        Width = 3
        Height = 68
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          179.916666666667000000
          1695.979166666670000000
          -60.854166666666700000
          7.937500000000000000)
        ShApe = qrsVertLine
      end
      object QRShApe3: TQRShApe
        Left = 716
        Top = -23
        Width = 3
        Height = 68
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          179.916666666667000000
          1894.416666666670000000
          -60.854166666666700000
          7.937500000000000000)
        ShApe = qrsVertLine
      end
      object QRExpr1: TQRExpr
        Left = 138
        Top = 0
        Width = 187
        Height = 14
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          37.041666666666670000
          365.125000000000000000
          0.000000000000000000
          494.770833333333400000)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Font.ChArset = ANSI_CHArSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = []
        Color = clWhite
        ParentFont = False
        ResetAfterPrint = False
        TransParent = False
        WordWrAp = True
        Expression = 'COPY(AdoQry_Line.ItemName,1,74)'
        FontSize = 9
      end
    end
    object ColumnHeaderBand1: TQRBand
      Left = 38
      Top = 36
      Width = 718
      Height = 52
      Frame.Color = clBlack
      Frame.DrawTop = False
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      AlignToBottom = False
      Color = clWhite
      ForceNewColumn = False
      ForceNewPage = False
      Size.Values = (
        137.583333333333300000
        1899.708333333333000000)
      BandType = rbColumnHeader
      object QRLabel13: TQRLabel
        Left = 6
        Top = 2
        Width = 41
        Height = 14
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          37.041666666666670000
          15.875000000000000000
          5.291666666666667000
          108.479166666666700000)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = #20179#24211': '
        Color = clWhite
        Font.ChArset = GB2312_CHArSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
        TransParent = False
        WordWrAp = True
        FontSize = 9
      end
      object QRLabel14: TQRLabel
        Left = 170
        Top = 2
        Width = 34
        Height = 14
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          37.041666666666670000
          449.791666666666700000
          5.291666666666667000
          89.958333333333340000)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = #36135#20301':'
        Color = clWhite
        Font.ChArset = GB2312_CHArSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
        TransParent = False
        WordWrAp = True
        FontSize = 9
      end
      object QRLabel16: TQRLabel
        Left = 567
        Top = 2
        Width = 47
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.979166666666670000
          1500.187500000000000000
          5.291666666666667000
          124.354166666666700000)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = #21333#25454#21495':'
        Color = clWhite
        Font.ChArset = GB2312_CHArSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
        TransParent = False
        WordWrAp = True
        FontSize = 9
      end
      object QRLabel18: TQRLabel
        Left = 568
        Top = 16
        Width = 34
        Height = 14
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          37.041666666666670000
          1502.833333333333000000
          42.333333333333340000
          89.958333333333340000)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = #26085#26399':'
        Color = clWhite
        Font.ChArset = GB2312_CHArSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = #23435#20307
        Font.Style = [fsBold]
        ParentFont = False
        TransParent = False
        WordWrAp = True
        FontSize = 9
      end
      object QRLabel17: TQRLabel
        Left = 6
        Top = 16
        Width = 47
        Height = 14