📄 inv_purchasein_po.dfm
字号:
inherited Frm_Inv_PurchaseIn_Po: TFrm_Inv_PurchaseIn_Po
Left = 320
Top = 104
BOrderIcons = [biSystemMenu, biMaximize, biHelp]
Caption = #22996#22806#21152#24037#26448#26009#36153#21333#25454
ClientHeight = 553
ClientWidth = 800
Scaled = False
PixelsPerInch = 96
TextHeight = 12
object QuickRep1: TQuickRep [0]
Left = 7
Top = 12
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
ShowProgress = False
SnApToGrid = True
Units = MM
Zoom = 100
object DetailBand1: TQRBand
Left = 38
Top = 82
Width = 718
Height = 28
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 = (
74.083333333333340000
1899.708333333333000000)
BandType = rbDetail
object Label3: TLabel
Left = 368
Top = 24
Width = 7
Height = 12
end
object QRDBText9: TQRDBText
Left = 5
Top = 6
Width = 28
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
13.229166666666700000
15.875000000000000000
74.083333333333300000)
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 = 6
Width = 49
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
164.041666666666700000
15.875000000000000000
129.645833333333300000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
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 = 382
Top = 6
Width = 43
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
1010.708333333333000000
15.875000000000000000
113.770833333333300000)
Alignment = taCenter
AlignToBand = False
AutoSize = True
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 = 432
Top = 6
Width = 61
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
1143.000000000000000000
15.875000000000000000
161.395833333333300000)
Alignment = tArightJustify
AlignToBand = False
AutoSize = True
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 = []
ParentFont = False
TransParent = False
WordWrAp = True
FontSize = 9
end
object QRDBText14: TQRDBText
Left = 464
Top = 5
Width = 103
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
1227.666666666667000000
13.229166666666670000
272.520833333333400000)
Alignment = tArightJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = AdoQry_Line
DataField = 'InvBillNoTaxPrice'
Font.ChArset = GB2312_CHArSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Mask = '0.######'
OnPrint = QRDBText14Print
ParentFont = False
TransParent = False
WordWrAp = True
FontSize = 9
end
object QRDBText15: TQRDBText
Left = 533
Top = 6
Width = 109
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
1410.229166666667000000
15.875000000000000000
288.395833333333400000)
Alignment = tArightJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = AdoQry_Line
DataField = 'InvBillNoTaxAmount'
Font.ChArset = GB2312_CHArSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = #23435#20307
Font.Style = []
Mask = '0.##'
OnPrint = QRDBText15Print
ParentFont = False
TransParent = False
WordWrAp = True
FontSize = 9
end
object QRShApe10: TQRShApe
Left = 56
Top = -18
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
-47.625000000000000000
7.937500000000000000)
ShApe = qrsVertLine
end
object QRShApe2: TQRShApe
Left = -1
Top = -19
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
-50.270833333333300000
7.937500000000000000)
ShApe = qrsVertLine
end
object QRShApe6: TQRShApe
Left = 134
Top = -18
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
-47.625000000000000000
7.937500000000000000)
ShApe = qrsVertLine
end
object QRExpr2: TQRExpr
Left = 138
Top = 0
Width = 187
Height = 16
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
42.333333333333340000
365.125000000000000000
0.000000000000000000
494.770833333333400000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Font.ChArset = GB2312_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,40)'
FontSize = 9
end
object QRExpr3: TQRExpr
Left = 138
Top = 12
Width = 193
Height = 16
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
42.333333333333340000
365.125000000000000000
31.750000000000000000
510.645833333333300000)
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,41,80)'
FontSize = 9
end
object QRShApe7: TQRShApe
Left = 377
Top = -18
Width = 3
Height = 68
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
179.916666666667000000
997.479166666667000000
-47.625000000000000000
7.937500000000000000)
ShApe = qrsVertLine
end
object QRShApe8: TQRShApe
Left = 425
Top = -18
Width = 3
Height = 68
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
179.916666666667000000
1124.479166666670000000
-47.625000000000000000
7.937500000000000000)
ShApe = qrsVertLine
end
object QRShApe9: TQRShApe
Left = 493
Top = -18
Width = 3
Height = 68
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
179.916666666667000000
1304.395833333330000000
-47.625000000000000000
7.937500000000000000)
ShApe = qrsVertLine
end
object QRShApe11: TQRShApe
Left = 568
Top = -18
Width = 3
Height = 68
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
179.916666666667000000
1502.833333333330000000
-47.625000000000000000
7.937500000000000000)
ShApe = qrsVertLine
end
object QRShApe3: TQRShApe
Left = 716
Top = -19
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
-50.270833333333300000
7.937500000000000000)
ShApe = qrsVertLine
end
object QRShApe12: TQRShApe
Left = 642
Top = -18
Width = 3
Height = 68
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
179.916666666667000000
1698.625000000000000000
-47.625000000000000000
7.937500000000000000)
ShApe = qrsVertLine
end
object QRDBText1: TQRDBText
Left = 655
Top = 6
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -