📄 leftpas.dfm
字号:
31.75
15.875
95.25)
Alignment = taCenter
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
Master = QRSubDetail2
ResetAfterPrint = False
Transparent = False
WordWrap = True
Expression = 'COUNT'
FontSize = 10
end
end
object DetailBand1: TQRBand
Left = 8
Top = 43
Width = 365
Height = 99
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = True
Frame.DrawLeft = True
Frame.DrawRight = True
AlignToBottom = False
Color = clWhite
ForceNewColumn = False
ForceNewPage = True
Size.Values = (
261.9375
965.729166666667)
BandType = rbDetail
object QRLabel2: TQRLabel
Left = 195
Top = 7
Width = 66
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
515.9375
18.5208333333333
174.625)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #23089#20048#21517#31216#65306
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel3: TQRLabel
Left = 11
Top = 29
Width = 66
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
29.1041666666667
76.7291666666667
174.625)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #24320#21488#26102#38388#65306
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel4: TQRLabel
Left = 195
Top = 29
Width = 66
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
515.9375
76.7291666666667
174.625)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #32467#26463#26102#38388#65306
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel5: TQRLabel
Left = 195
Top = 51
Width = 66
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
515.9375
134.9375
174.625)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #28040#36153#26102#38388#65306
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText1: TQRDBText
Left = 264
Top = 7
Width = 27
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
698.5
18.5208333333333
71.4375)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = P1
DataField = #21517#31216
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText2: TQRDBText
Left = 80
Top = 29
Width = 53
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
211.666666666667
76.7291666666667
140.229166666667)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = P1
DataField = #24320#22987#26102#38388
Mask = 'hh"'#28857'"mm"'#20998'"'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText3: TQRDBText
Left = 264
Top = 29
Width = 53
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
698.5
76.7291666666667
140.229166666667)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = P1
DataField = #32467#26463#26102#38388
Mask = 'hh"'#28857'"mm"'#20998'"'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel21: TQRLabel
Left = 11
Top = 7
Width = 67
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
29.1041666666667
18.5208333333333
177.270833333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #27969' '#27700' '#21495#65306
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText14: TQRDBText
Left = 80
Top = 7
Width = 40
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
211.666666666667
18.5208333333333
105.833333333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = P1
DataField = #27969#27700#21495
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel22: TQRLabel
Left = 11
Top = 51
Width = 66
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
29.1041666666667
134.9375
174.625)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #21488#12288#12288#21495#65306
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText15: TQRDBText
Left = 80
Top = 51
Width = 27
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
211.666666666667
134.9375
71.4375)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = P1
DataField = #32534#21495
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText4: TQRDBText
Left = 264
Top = 51
Width = 53
Height = 16
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
42.3333333333333
698.5
134.9375
140.229166666667)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = P1
DataField = #28040#36153#26102#38388
Mask = '#0.00'#23567#26102
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel10: TQRLabel
Left = 11
Top = 73
Width = 66
Height = 16
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
42.3333333333333
29.1041666666667
193.145833333333
174.625)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #31199#25293#37329#39069#65306
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel11: TQRLabel
Left = 195
Top = 73
Width = 66
Height = 16
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
42.3333333333333
515.9375
193.145833333333
174.625)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #23089#20048#37329#39069#65306
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText9: TQRDBText
Left = 80
Top = 73
Width = 53
Height = 16
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
42.3333333333333
211.666666666667
193.145833333333
140.229166666667)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = P1
DataField = #31199#25293#37329#39069
Mask = #65509'0.00'#20803
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText16: TQRDBText
Left = 264
Top = 73
Width = 53
Height = 16
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
42.3333333333333
698.5
193.145833333333
140.229166666667)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = P1
DataField = #23089#20048#37329#39069
Mask = #65509'0.00'#20803
Transparent = False
WordWrap = True
FontSize = 10
end
end
end
object P2: TQuery
DatabaseName = 'PlayBall'
RequestLive = True
Left = 384
Top = 248
end
object P3: TQuery
DatabaseName = 'PlayBall'
RequestLive = True
Left = 416
Top = 248
end
object P2s: TDataSource
DataSet = P2
Left = 384
Top = 304
end
object P3s: TDataSource
DataSet = P3
Left = 416
Top = 304
end
object P1s: TDataSource
DataSet = P1
Left = 352
Top = 304
end
object P1: TQuery
CachedUpdates = True
AfterPost = P1AfterPost
DatabaseName = 'PlayBall'
RequestLive = True
UpdateObject = UpdateSQL1
Left = 352
Top = 248
end
object Timer1: TTimer
Interval = 100
OnTimer = Timer1Timer
Left = 320
Top = 304
end
object UpdateSQL1: TUpdateSQL
ModifySQL.Strings = (
'Update Ball01'
'Set'
' '#23089#20048#37329#39069' = :'#23089#20048#37329#39069','
' '#37202#27700#37329#39069' = :'#37202#27700#37329#39069','
' '#23454#25910#37329#39069' = :'#23454#25910#37329#39069','
' '#32467#26463#26102#38388' = :'#32467#26463#26102#38388','
' '#32467#24080#26631#24535' = :'#32467#24080#26631#24535','
' '#25240#25187#27604#29575' = :'#25240#25187#27604#29575','
' '#26085#26399' = :'#26085#26399','#22791#27880' = :'#22791#27880
'where'
' '#27969#27700#21495' = :OLD_'#27969#27700#21495)
Left = 320
Top = 248
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -