⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 sal_enter_shiporder_p.dfm

📁 一个MRPII系统源代码版本
💻 DFM
📖 第 1 页 / 共 3 页
字号:
        Size.Values = (
          37.0416666666667
          26.4583333333333
          121.708333333333
          243.416666666667)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = 'QrLbl_IsoCode'
        Color = clWhite
        TransParent = False
        WordWrAp = True
        FontSize = 10
      end
    end
    object DetailBand1: TQRBand
      Left = 38
      Top = 188
      Width = 718
      Height = 27
      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 = (
        71.4375
        1899.70833333333)
      BandType = rbDetail
      object QRShApe2: TQRShApe
        Left = 0
        Top = 0
        Width = 717
        Height = 28
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = True
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          74.0833333333333
          0
          0
          1897.0625)
        ShApe = qrsRectanGle
      end
      object QRDBText1: TQRDBText
        Left = 4
        Top = 8
        Width = 92
        Height = 14
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          37.0416666666667
          10.5833333333333
          21.1666666666667
          243.416666666667)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = AdoQry_Tmp
        DataField = 'InvBillLineNo'
        TransParent = False
        WordWrAp = True
        FontSize = 10
      end
      object QRDBText2: TQRDBText
        Left = 39
        Top = 8
        Width = 57
        Height = 14
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          37.0416666666667
          103.1875
          21.1666666666667
          150.8125)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = AdoQry_Tmp
        DataField = 'ItemCode'
        TransParent = False
        WordWrAp = True
        FontSize = 10
      end
      object QRDBText3: TQRDBText
        Left = 117
        Top = 8
        Width = 57
        Height = 14
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          37.0416666666667
          309.5625
          21.1666666666667
          150.8125)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = AdoQry_Tmp
        DataField = 'ItemName'
        TransParent = False
        WordWrAp = True
        FontSize = 10
      end
      object QRDBText4: TQRDBText
        Left = 408
        Top = 8
        Width = 50
        Height = 14
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          37.0416666666667
          1079.5
          21.1666666666667
          132.291666666667)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = AdoQry_Tmp
        DataField = 'UomName'
        TransParent = False
        WordWrAp = True
        FontSize = 10
      end
      object QRDBText5: TQRDBText
        Left = 492
        Top = 8
        Width = 71
        Height = 14
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          37.0416666666667
          1301.75
          21.1666666666667
          187.854166666667)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = AdoQry_Tmp
        DataField = 'InvBillQty'
        TransParent = False
        WordWrAp = True
        FontSize = 10
      end
      object QRDBText6: TQRDBText
        Left = 567
        Top = 8
        Width = 85
        Height = 14
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          37.0416666666667
          1500.1875
          21.1666666666667
          224.895833333333)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = AdoQry_Tmp
        DataField = 'InvBillPrice'
        TransParent = False
        WordWrAp = True
        FontSize = 10
      end
      object QRDBText7: TQRDBText
        Left = 646
        Top = 8
        Width = 92
        Height = 14
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          37.0416666666667
          1709.20833333333
          21.1666666666667
          243.416666666667)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Color = clWhite
        DataSet = AdoQry_Tmp
        DataField = 'InvBillAmount'
        TransParent = False
        WordWrAp = True
        FontSize = 10
      end
      object QRShApe10: TQRShApe
        Left = 106
        Top = 0
        Width = 9
        Height = 27
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          71.4375
          280.458333333333
          0
          23.8125)
        ShApe = qrsVertLine
      end
      object QRShApe9: TQRShApe
        Left = 31
        Top = 0
        Width = 7
        Height = 27
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          71.4375
          82.0208333333333
          0
          18.5208333333333)
        ShApe = qrsVertLine
      end
      object QRShApe11: TQRShApe
        Left = 400
        Top = -1
        Width = 9
        Height = 27
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          71.4375
          1058.33333333333
          -2.64583333333333
          23.8125)
        ShApe = qrsVertLine
      end
      object QRShApe12: TQRShApe
        Left = 455
        Top = -1
        Width = 9
        Height = 27
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          71.4375
          1203.85416666667
          -2.64583333333333
          23.8125)
        ShApe = qrsVertLine
      end
      object QRShApe13: TQRShApe
        Left = 540
        Top = 1
        Width = 9
        Height = 26
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          68.7916666666667
          1428.75
          2.64583333333333
          23.8125)
        ShApe = qrsVertLine
      end
      object QRShApe14: TQRShApe
        Left = 625
        Top = 1
        Width = 9
        Height = 26
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          68.7916666666667
          1653.64583333333
          2.64583333333333
          23.8125)
        ShApe = qrsVertLine
      end
    end
    object SummAryBand1: TQRBand
      Left = 38
      Top = 215
      Width = 718
      Height = 40
      Frame.Color = clBlack
      Frame.DrawTop = True
      Frame.DrawBottom = False
      Frame.DrawLeft = False
      Frame.DrawRight = False
      AlignToBottom = False
      Color = clWhite
      ForceNewColumn = False
      ForceNewPage = False
      Size.Values = (
        105.833333333333
        1899.70833333333)
      BandType = rbSummAry
      object QRLabel1: TQRLabel
        Left = 5
        Top = 9
        Width = 53
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          13.2291666666667
          23.8125
          140.229166666667)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = '发货人:'
        Color = clWhite
        Font.ChArset = DEFAULT_CHArSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        TransParent = False
        WordWrAp = True
        FontSize = 9
      end
      object QRL_Saler: TQRLabel
        Left = 66
        Top = 9
        Width = 25
        Height = 18
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          47.625
          174.625
          23.8125
          66.1458333333333)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = 'zzzz'
        Color = clWhite
        Font.ChArset = DEFAULT_CHArSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        TransParent = False
        WordWrAp = True
        FontSize = 9
      end
      object QRLabel20: TQRLabel
        Left = 317
        Top = 9
        Width = 53
        Height = 17
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          44.9791666666667
          838.729166666667
          23.8125
          140.229166666667)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = '审核人:'
        Color = clWhite
        Font.ChArset = DEFAULT_CHArSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        TransParent = False
        WordWrAp = True
        FontSize = 9
      end
      object QRL_Asser: TQRLabel
        Left = 378
        Top = 9
        Width = 25
        Height = 18
        Frame.Color = clBlack
        Frame.DrawTop = False
        Frame.DrawBottom = False
        Frame.DrawLeft = False
        Frame.DrawRight = False
        Size.Values = (
          47.625
          1000.125
          23.8125
          66.1458333333333)
        Alignment = taLeftJustify
        AlignToBand = False
        AutoSize = True
        AutoStretch = False
        Caption = 'zzzz'
        Color = clWhite
        Font.ChArset = DEFAULT_CHArSET
        Font.Color = clWindowText
        Font.Height = -12
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
        TransParent = False
        WordWrAp = True
        FontSize = 9
      end
    end
  end
  inherited AdoQry_Tmp: TAdoQuery
    ConnectionString = 
      'Provider=SQLOLEDB.1;Password=mdrcmrm;Persist Security Info=True;' +
      'User ID=mdrcmrm;Initial Catalog=mdrcmrm;Data Source=192.168.0.15' +
      '1'
    CurSorType = ctStatic
    SQL.Strings = (
      'Select Sa_SaleOrderLine.*,Item.ItemName ,Uom.UomName'
      '    From Sa_SaleOrderLine'
      
        '             Join Item On Sa_SaleOrderLine.ItemCode=Item.ItemCod' +
        'e '
      
        '            --+'#39' And  Sa_SaleOrderLine.SloNo='#39#39#39'+Trim(SloNo)+'#39#39#39 +
        #39
      '             left Join Uom On Item.UomCode=Uom.UomCode')
    Left = 360
    Top = 240
  end
  object PrinterSetupDialog1: TPrinterSetupDialog
    Left = 209
    Top = 18
  end
  object AdoQry_Main: TAdoQuery
    Parameters = <>
    Left = 343
    Top = 287
  end
end

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -