📄 inv_amountadjust_p.dfm
字号:
inherited Frm_Inv_AmountAdjust_P: TFrm_Inv_AmountAdjust_P
Left = 344
Top = 186
BorderIcons = [biSystemMenu, biMaximize, biHelp]
Caption = #20854#23427#20837#24211
ClientHeight = 429
ClientWidth = 779
Scaled = False
PixelsPerInch = 96
TextHeight = 12
object QuickRep1: TQuickRep [0]
Left = 3
Top = 11
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 = 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 = 49
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
129.645833333333000000)
Alignment = taCenter
AlignToBand = False
AutoSize = False
AutoStretch = False
Color = clWhite
DataSet = AdoQry_Line
DataField = 'InvBillLineno'
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 = 69
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
164.041666666667000000
15.875000000000000000
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 = 365
Top = 6
Width = 39
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
965.729166666667000000
15.875000000000000000
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 QRDBText15: TQRDBText
Left = 412
Top = 6
Width = 76
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
1090.083333333330000000
15.875000000000000000
201.083333333333000000)
Alignment = taRightJustify
AlignToBand = False
AutoSize = False
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 = []
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 = 140
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
370.416666666666700000
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,36)'
FontSize = 9
end
object QRExpr3: TQRExpr
Left = 140
Top = 13
Width = 193
Height = 16
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
42.333333333333340000
370.416666666666700000
34.395833333333340000
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,37,23)'
FontSize = 9
end
object QRShApe7: TQRShape
Left = 359
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
949.854166666667000000
-47.625000000000000000
7.937500000000000000)
Shape = qrsVertLine
end
object QRShApe8: TQRShape
Left = 407
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
1076.854166666670000000
-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 = 489
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
1293.812500000000000000
-47.625000000000000000
7.937500000000000000)
Shape = qrsVertLine
end
object QRDBText1: TQRDBText
Left = 499
Top = 6
Width = 211
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666700000
1320.270833333330000000
15.875000000000000000
558.270833333333000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = False
AutoStretch = False
Color = clWhite
DataSet = AdoQry_Line
DataField = 'BilllineremArk'
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
end
object ColumnHeaderBand1: TQRBand
Left = 38
Top = 31
Width = 718
Height = 51
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 = (
134.937500000000000000
1899.708333333333000000)
BandType = rbColumnHeader
object QRLabel13: TQRLabel
Left = 6
Top = 0
Width = 41
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
15.875000000000000000
0.000000000000000000
108.479166666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #20179#24211': '
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -