📄 sal_enter_backshiporder_p.dfm
字号:
Size.Values = (
58.2083333333333
1431.39583333333
336.020833333333
15.875)
ShApe = qrsVertLine
end
object QRShApe8: TQRShApe
Left = 625
Top = 127
Width = 7
Height = 22
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
58.2083333333333
1653.64583333333
336.020833333333
18.5208333333333)
ShApe = qrsVertLine
end
object QRLbl_Title: TQRLabel
Left = 255
Top = 1
Width = 208
Height = 26
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
68.7916666666667
674.6875
2.64583333333333
550.333333333333)
Alignment = taCenter
AlignToBand = True
AutoSize = True
AutoStretch = False
Caption = '美迪电器集团有限公司'
Color = clWhite
Font.ChArset = DEFAULT_CHArSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
TransParent = False
WordWrAp = True
FontSize = 16
end
object Qrlbl_Caption: TQRLabel
Left = 316
Top = 27
Width = 86
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
836.083333333333
71.4375
227.541666666667)
Alignment = taCenter
AlignToBand = True
AutoSize = True
AutoStretch = False
Caption = '销售退货单'
Color = clWhite
Font.ChArset = DEFAULT_CHArSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = '宋体'
Font.Style = [fsBold]
ParentFont = False
TransParent = False
WordWrAp = True
FontSize = 12
end
object QrLbl_IsoCode: TQRLabel
Left = 10
Top = 46
Width = 92
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
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 = 27
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
71.4375
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
end
inherited AdoQry_Tmp: TAdoQuery
ConnectionString =
'Provider=SQLOLEDB.1;Password=mdrcmrm;Persist Security Info=True;' +
'User ID=mdrcmrm;Initial Catalog=Mrpii_kelong;Data Source=192.168' +
'.0.100'
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 = 135
Top = 263
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -