📄 unit_reportreceipt.dfm
字号:
Size.Values = (
343.958333333333300000
1899.708333333333000000)
BandType = rbSummary
object QRShape3: TQRShape
Left = 0
Top = -1
Width = 333
Height = 130
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
343.958333333333400000
0.000000000000000000
-2.645833333333333000
881.062500000000000000)
Shape = qrsRectangle
end
object QRLabel5: TQRLabel
Left = 8
Top = 8
Width = 65
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
21.166666666666670000
21.166666666666670000
171.979166666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #24635#20849#28040#36153
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText3: TQRDBText
Left = 80
Top = 8
Width = 58
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
211.666666666666700000
21.166666666666670000
153.458333333333300000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = qry_main
DataField = 'cost_sum'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText4: TQRDBText
Left = 256
Top = 6
Width = 82
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
677.333333333333300000
15.875000000000000000
216.958333333333300000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = qry_main
DataField = 'discount_sum'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel6: TQRLabel
Left = 184
Top = 6
Width = 65
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
486.833333333333300000
15.875000000000000000
171.979166666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #25171#25240#21518#35745
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel9: TQRLabel
Left = 8
Top = 56
Width = 81
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
21.166666666666670000
148.166666666666700000
214.312500000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #25171#21360#26085#26399#65306
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRSysData1: TQRSysData
Left = 96
Top = 56
Width = 36
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
254.000000000000000000
148.166666666666700000
95.250000000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
Color = clWhite
Data = qrsDate
Transparent = False
FontSize = 10
end
object QRLabel11: TQRLabel
Left = 6
Top = 107
Width = 81
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
15.875000000000000000
283.104166666666700000
214.312500000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #32852#31995#30005#35805#65306
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText9: TQRDBText
Left = 94
Top = 107
Width = 57
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
248.708333333333300000
283.104166666666700000
150.812500000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = qry_name
DataField = 'telephone'
Transparent = False
WordWrap = True
FontSize = 10
end
object qrlbl_welcome: TQRLabel
Left = 64
Top = 85
Width = 129
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
169.333333333333300000
224.895833333333300000
341.312500000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #27426#36814#24744#20877#27425#20809#20020#65281
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel8: TQRLabel
Left = 184
Top = 32
Width = 65
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
486.833333333333300000
84.666666666666670000
171.979166666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #24212#35813#25214#38646
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText5: TQRDBText
Left = 256
Top = 32
Width = 43
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
677.333333333333300000
84.666666666666670000
113.770833333333300000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = qry_main
DataField = 'change'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRShape4: TQRShape
Left = 1
Top = 28
Width = 330
Height = 1
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
2.645833333333333000
2.645833333333333000
74.083333333333340000
873.124999999999900000)
Shape = qrsRectangle
end
object QRShape5: TQRShape
Left = 1
Top = 53
Width = 330
Height = 1
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
2.645833333333333000
2.645833333333333000
140.229166666666700000
873.124999999999900000)
Shape = qrsRectangle
end
object QRShape6: TQRShape
Left = 1
Top = 76
Width = 330
Height = 1
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
2.645833333333333000
2.645833333333333000
201.083333333333300000
873.124999999999900000)
Shape = qrsRectangle
end
object QRLabel7: TQRLabel
Left = 8
Top = 32
Width = 65
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
21.166666666666670000
84.666666666666670000
171.979166666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #24635#35745#20849#25910
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText6: TQRDBText
Left = 80
Top = 32
Width = 51
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
211.666666666666700000
84.666666666666670000
134.937500000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = qry_main
DataField = 'payment'
Transparent = False
WordWrap = True
FontSize = 10
end
end
end
object qry_name: TQuery
DatabaseName = 'MeiRong'
SQL.Strings = (
'select unitname,telephone from unit')
Left = 16
Top = 8
end
object qry_main: TQuery
DatabaseName = 'MeiRong'
SQL.Strings = (
'select cost_sum,payment,discount_sum,change,ccd.item_id,item_nam' +
'e,item_price '
'from CustomerCost cc,customercostdetail ccd,ServiceItem si wher' +
'e cc.cost_no='
'ccd.cost_no and ccd.item_id=si.item_id and cc.cost_no=:costno')
Left = 64
Top = 8
ParamData = <
item
DataType = ftString
Name = 'costno'
ParamType = ptInput
Value = ''
end>
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -