📄 ying_fu_report.~dfm
字号:
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 20
end
object QRLabel2: TQRLabel
Left = 586
Top = 93
Width = 53
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
1550.45833333333
246.0625
140.229166666667)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #21046#34920#20154':'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel3: TQRLabel
Left = 646
Top = 92
Width = 58
Height = 19
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
50.2708333333333
1709.20833333333
243.416666666667
153.458333333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'QRLabel3'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel16: TQRLabel
Left = 5
Top = 92
Width = 101
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
13.2291666666667
243.416666666667
267.229166666667)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #38928#23450#20184#27454#26085#26399':'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRShape3: TQRShape
Left = 8
Top = 119
Width = 721
Height = 1
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
2.64583333333333
21.1666666666667
314.854166666667
1907.64583333333)
Pen.Width = 2
Shape = qrsRectangle
end
object QRLabel8: TQRLabel
Left = 128
Top = 92
Width = 58
Height = 18
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
47.625
338.666666666667
243.416666666667
153.458333333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'QRLabel8'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel11: TQRLabel
Left = 108
Top = 92
Width = 17
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
285.75
243.416666666667
44.9791666666667)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #24478
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel12: TQRLabel
Left = 207
Top = 92
Width = 17
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
547.6875
243.416666666667
44.9791666666667)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #21040
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel14: TQRLabel
Left = 228
Top = 92
Width = 65
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
603.25
243.416666666667
171.979166666667)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'QRLabel14'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRShape4: TQRShape
Left = 127
Top = 112
Width = 73
Height = 1
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
2.64583333333333
336.020833333333
296.333333333333
193.145833333333)
Shape = qrsRectangle
end
object QRShape5: TQRShape
Left = 227
Top = 112
Width = 73
Height = 1
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
2.64583333333333
600.604166666667
296.333333333333
193.145833333333)
Shape = qrsRectangle
end
object QRLabel20: TQRLabel
Left = 324
Top = 92
Width = 37
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
857.25
243.416666666667
97.8958333333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #24288#21830':'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel21: TQRLabel
Left = 369
Top = 93
Width = 65
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
976.3125
246.0625
171.979166666667)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'QRLabel21'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRShape7: TQRShape
Left = 366
Top = 112
Width = 73
Height = 1
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
2.64583333333333
968.375
296.333333333333
193.145833333333)
Shape = qrsRectangle
end
end
end
object DataSource1: TDataSource
Left = 368
Top = 312
end
object PrintDialog1: TPrintDialog
Left = 576
Top = 85
end
object sp1: TStoredProc
Active = True
DatabaseName = 'vvv'
StoredProcName = 'cai_fu_kuan_chang;1'
Left = 224
Top = 261
ParamData = <
item
DataType = ftInteger
Name = 'RETURN_VALUE'
ParamType = ptResult
Value = 0
end
item
DataType = ftDateTime
Name = '@str1'
ParamType = ptInput
end
item
DataType = ftDateTime
Name = '@str2'
ParamType = ptInput
end
item
DataType = ftString
Name = '@str3'
ParamType = ptInput
end>
end
object sp2: TStoredProc
Active = True
DatabaseName = 'vvv'
StoredProcName = 'cai_fu_kuan_wu;1'
Left = 96
Top = 280
ParamData = <
item
DataType = ftInteger
Name = 'RETURN_VALUE'
ParamType = ptResult
Value = 0
end
item
DataType = ftDateTime
Name = '@str1'
ParamType = ptInput
end
item
DataType = ftDateTime
Name = '@str2'
ParamType = ptInput
end
item
DataType = ftString
Name = '@str3'
ParamType = ptInput
end>
end
object sp3: TStoredProc
Active = True
DatabaseName = 'vvv'
StoredProcName = 'sum_jing;1'
Left = 480
Top = 312
ParamData = <
item
DataType = ftInteger
Name = 'RETURN_VALUE'
ParamType = ptResult
Value = 0
end
item
DataType = ftDateTime
Name = '@str1'
ParamType = ptInput
end
item
DataType = ftDateTime
Name = '@str2'
ParamType = ptInput
end>
end
object sp4: TStoredProc
Active = True
DatabaseName = 'vvv'
StoredProcName = 'sum_jing1;1'
Left = 568
Top = 312
ParamData = <
item
DataType = ftInteger
Name = 'RETURN_VALUE'
ParamType = ptResult
Value = 89475792
end
item
DataType = ftDateTime
Name = '@str1'
ParamType = ptInput
end
item
DataType = ftDateTime
Name = '@str2'
ParamType = ptInput
end
item
DataType = ftString
Name = '@str3'
ParamType = ptInput
end>
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -