📄 rpt_lxql.dfm
字号:
Transparent = False
WordWrap = True
FontSize = 11
end
object QRShape15: TQRShape
Left = 327
Top = 120
Width = 97
Height = 28
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
74.0833333333333
865.1875
317.5
256.645833333333)
Shape = qrsRightAndLeft
end
object QRImage1: TQRImage
Left = 81
Top = 7
Width = 57
Height = 49
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
129.645833333333
214.3125
18.5208333333333
150.8125)
Picture.Data = {
07544269746D617096040000424D960400000000000076000000280000002C00
00002C0000000100040000000000200400000000000000000000100000000000
000000000000000080000080000000808000800000008000800080800000C0C0
C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
FF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFF222222222222222222FFF
FFFFFFFFFFFFFFFF0000FFFFFFFF222222222222222222FFFFFFFFFFFFFFFFFF
0000FFFFFFFF222222222222222222FFFFFFFFFFFFFFFFFF0000FFFFFFFF2222
22222222222222FFFFFFFFFFFFFFFFFF0000FFFFFFFFF22FFFFFFFFFFFFFF22F
FFFFFFFFFFFFFFFF0000FFFFFFFFF22FFFFFFFFFFFFFF22FFFFFFFFFFFFFFFFF
0000FFFFFFFFF22222222222222FF22FFFFFFFFFFFFFFFFF0000FFFFFFFFFF22
222222222222FF22FFFFFFFFFFFFFFFF0000FFFFFFFFFF22222222222222FF22
FFFFFFFFFFFFFFFF0000FFFFFFFFFF22222222222222FF22FFFFFFFFFFFFFFFF
0000FFFFFFFFFFF22FFFFFFFFFF22FF22FFFFFFFFFFFFFFF0000FFFFFFFFFFF2
2FFFFFFFFFF22FF22FFFFFFFFFFFFFFF0000FFF222222222222222222FF22FF2
22222FFFFFFFFFFF0000FFFF222222222222222222FF22FF222222FFFFFFFFFF
0000FFFF222222222222222222FF22FF222222FFFFFFFFFF0000FFFF22222222
2222222222FF22FF222222FFFFFFFFFF0000FFFFF22FFFFFF22FFFFFF22FF22F
FFFFFFFFFFFFFFFF0000FFFFF22FFFFFF22FFFFFF22FF22FFFFFFFFFFFFFFFFF
0000FFFFF222222222222222222FF2222222222FFFFFFFFF0000FFFFFF222222
222222222222FF2222222222FFFFFFFF0000FFFFFF222222222222222222FF22
22222222FFFFFFFF0000FFFFFF222222222222222222FF2222222222FFFFFFFF
0000FFFFFFFFFFFFFFF22FFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
FFF22FFFFFFFFFFFFFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFF2222222222222
FFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFF2222222222222FFFFFFFFFFFFFFF
0000FFFFFFFFFFFFFFFF2222222222222FFFFFFFFFFFFFFF0000FFFFFFFFFFFF
FFFF2222222222222FFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFF22FFFFFFFFF
22FFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFF22FFFFFFFFF22FFFFFFFFFFFFFF
0000FFFFFFFFFFFFFFFFF222222222FF22222222222FFFFF0000FFFFFFFFFFFF
FFFFFF222222222FF22222222222FFFF0000FFFFFFFFFFFFFFFFFF222222222F
F22222222222FFFF0000FFFFFFFFFFFFFFFFFF222222222FF22222222222FFFF
0000FFFFFFFFFFFFFFFFFFFFFFFFFF22FFFFFFFFFFFFFFFF0000FFFFFFFFFFFF
FFFFFFFFFFFFFF22FFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFF22
2222222222222FFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFF222222222222222FF
0000FFFFFFFFFFFFFFFFFFFFFFFFFFF222222222222222FF0000FFFFFFFFFFFF
FFFFFFFFFFFFFFF222222222222222FF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFF0000FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
0000}
Stretch = True
end
object QRLabel11: TQRLabel
Left = 80
Top = 60
Width = 61
Height = 13
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
34.3958333333333
211.666666666667
158.75
161.395833333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'CHINA POST'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 9
end
object QRSysData1: TQRSysData
Left = 163
Top = 24
Width = 443
Height = 34
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
89.9583333333333
431.270833333333
63.5
1172.10416666667)
Alignment = taCenter
AlignToBand = False
AutoSize = False
Color = clWhite
Data = qrsReportTitle
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -29
Font.Name = '宋体'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
FontSize = 22
end
object QRLabel4: TQRLabel
Left = 281
Top = 125
Width = 34
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
743.479166666667
330.729166666667
89.9583333333333)
Alignment = taCenter
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = '图别'
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = '宋体'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 11
end
object QRLabel3: TQRLabel
Left = 359
Top = 125
Width = 34
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
949.854166666667
330.729166666667
89.9583333333333)
Alignment = taCenter
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = '单价'
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = '宋体'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 11
end
object QRShape2: TQRShape
Left = 548
Top = 120
Width = 7
Height = 28
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
74.0833333333333
1449.91666666667
317.5
18.5208333333333)
Shape = qrsVertLine
end
object QRLabel5: TQRLabel
Left = 453
Top = 125
Width = 68
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
1198.5625
330.729166666667
179.916666666667)
Alignment = taCenter
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = '数量(枚)'
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = '宋体'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 11
end
object QRLabel7: TQRLabel
Left = 587
Top = 127
Width = 68
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
1553.10416666667
336.020833333333
179.916666666667)
Alignment = taCenter
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = '金额(元)'
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = '宋体'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 11
end
object QRLabel15: TQRLabel
Left = 339
Top = 96
Width = 39
Height = 16
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
42.3333333333333
896.9375
254
103.1875)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = '单位:'
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = '宋体'
Font.Style = []
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 11
end
object QRLabel16: TQRLabel
Left = 385
Top = 96
Width = 16
Height = 16
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
42.3333333333333
1018.64583333333
254
42.3333333333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = '枚'
Color = clWhite
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = '宋体'
Font.Style = []
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 11
end
object QRShape8: TQRShape
Left = 2
Top = 76
Width = 678
Height = 1
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
2.64583333333333
5.29166666666667
201.083333333333
1793.875)
Shape = qrsRectangle
end
object QRDBText6: TQRDBText
Left = 94
Top = 96
Width = 183
Height = 16
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
42.3333333333333
248.708333333333
254
484.1875)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = False
AutoStretch = False
Color = clWhite
DataSet = qryRpt
DataField = 'DWMC'
Transparent = False
WordWrap = True
FontSize = 11
end
end
end
object qryRpt: TQuery
CachedUpdates = True
DatabaseName = 'yzpp'
RequestLive = True
SQL.Strings = (
'select'
' g.dwmc,'
' ppmc,'
' to_number(substr(ppdm,12,2)) tb,'
' mz,'
' sl,'
' je,'
' zbr,'
' zbrq'
''
'from tys_txpqld q,to_gxdwsjb g'
'where q.qldh = :qldh'
'and g.dwdm = q.dwdm'
' ')
UpdateObject = UpdateSQL1
Left = 121
Top = 323
ParamData = <
item
DataType = ftString
Name = 'qldh'
ParamType = ptUnknown
end>
object qryRptDWMC: TStringField
FieldName = 'DWMC'
Size = 40
end
object qryRptPPMC: TStringField
FieldName = 'PPMC'
Size = 60
end
object qryRptTB: TFloatField
FieldName = 'TB'
end
object qryRptMZ: TFloatField
FieldName = 'MZ'
OnGetText = qryRptJEGetText
end
object qryRptSL: TFloatField
FieldName = 'SL'
DisplayFormat = '#,##'
end
object qryRptJE: TFloatField
FieldName = 'JE'
OnGetText = qryRptJEGetText
end
object qryRptZBR: TStringField
FieldName = 'ZBR'
Size = 12
end
object qryRptZBRQ: TDateTimeField
FieldName = 'ZBRQ'
end
end
object UpdateSQL1: TUpdateSQL
Left = 161
Top = 323
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -