📄 skycwbb.dfm
字号:
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
37.0416666666667
193.145833333333
444.5
145.520833333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'QRLabel20'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 9
end
object QRLabel25: TQRLabel
Left = 16
Top = 190
Width = 49
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
37.0416666666667
42.3333333333333
502.708333333333
129.645833333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #36864#39184#31508#25968
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 9
end
object QRLabel26: TQRLabel
Left = 73
Top = 188
Width = 55
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
37.0416666666667
193.145833333333
497.416666666667
145.520833333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'QRLabel20'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 9
end
object QRLabel27: TQRLabel
Left = 16
Top = 208
Width = 49
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
37.0416666666667
42.3333333333333
550.333333333333
129.645833333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #36864' '#39184' '#29575
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 9
end
object QRLabel28: TQRLabel
Left = 73
Top = 208
Width = 55
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
37.0416666666667
193.145833333333
550.333333333333
145.520833333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'QRLabel20'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 9
end
object QRLabel29: TQRLabel
Left = 200
Top = 190
Width = 49
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
37.0416666666667
529.166666666667
502.708333333333
129.645833333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #36864#39184#37329#39069
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 9
end
object QRLabel30: TQRLabel
Left = 264
Top = 190
Width = 55
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
37.0416666666667
698.5
502.708333333333
145.520833333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'QRLabel20'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 9
end
end
object SummaryBand2: TQRBand
Left = 8
Top = 318
Width = 673
Height = 40
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 = (
105.833333333333
1780.64583333333)
BandType = rbSummary
object QRLabel17: TQRLabel
Left = 32
Top = 5
Width = 31
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.9791666666667
84.6666666666667
13.2291666666667
82.0208333333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #25910#38134':'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 9
end
object QRLabel34: TQRLabel
Left = 72
Top = 8
Width = 55
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
37.0416666666667
190.5
21.1666666666667
145.520833333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'QRLabel34'
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 9
end
end
object ColumnHeaderBand1: TQRBand
Left = 8
Top = 273
Width = 673
Height = 22
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 = (
58.2083333333333
1780.64583333333)
BandType = rbColumnHeader
object QRLabel31: TQRLabel
Left = 24
Top = 5
Width = 25
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
37.0416666666667
63.5
13.2291666666667
66.1458333333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #31508#25968
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 9
end
object QRLabel32: TQRLabel
Left = 112
Top = 5
Width = 49
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
37.0416666666667
296.333333333333
13.2291666666667
129.645833333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #20184#27454#26041#24335
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 9
end
object QRLabel33: TQRLabel
Left = 248
Top = 5
Width = 49
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
37.0416666666667
656.166666666667
13.2291666666667
129.645833333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = #20184#27454#37329#39069
Color = clWhite
Transparent = False
WordWrap = True
FontSize = 9
end
end
object DetailBand1: TQRBand
Left = 8
Top = 295
Width = 673
Height = 23
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 = (
60.8541666666667
1780.64583333333)
BandType = rbDetail
object QRDBText1: TQRDBText
Left = 16
Top = 3
Width = 13
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
37.0416666666667
42.3333333333333
7.9375
34.3958333333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = Query2
DataField = 'bs'
Transparent = False
WordWrap = True
FontSize = 9
end
object QRDBText2: TQRDBText
Left = 112
Top = 3
Width = 37
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
37.0416666666667
296.333333333333
7.9375
97.8958333333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = Query2
DataField = 'fkfsmc'
Transparent = False
WordWrap = True
FontSize = 9
end
object QRDBText3: TQRDBText
Left = 273
Top = 3
Width = 19
Height = 14
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
37.0416666666667
722.3125
7.9375
50.2708333333333)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = Query2
DataField = 'jee'
Transparent = False
WordWrap = True
FontSize = 9
end
end
end
end
object DataSource1: TDataSource
DataSet = Query1
Left = 24
Top = 85
end
object Query1: TQuery
DatabaseName = 'aa'
SQL.Strings = (
'SELECT count(djh) as djsl, lb, mc, bh, sum(sl) as sle, sum(je) a' +
's jee, sum(zke) as zkee, sum(fwfe) fwfee, sum(se) as see'
'FROM dcd dcd'
'where rq>=:cs1 and rq<=:cs2 and fkbz=1 and zfbz=0 and yhh=:cs3'
'group by lb,bh,mc'
'order by lb,bh')
Left = 56
Top = 85
ParamData = <
item
DataType = ftDateTime
Name = 'cs1'
ParamType = ptUnknown
end
item
DataType = ftDateTime
Name = 'cs2'
ParamType = ptUnknown
end
item
DataType = ftUnknown
Name = 'cs3'
ParamType = ptUnknown
end>
end
object Query2: TQuery
CachedUpdates = True
DatabaseName = 'aa'
SQL.Strings = (
'SELECT count(distinct a.djh) as bs, a.fkfsmc, sum(distinct a.fkj' +
'e) as jee'
'FROM fkwj a, dcd b'
'where a.rq>=:cs1 and a.rq<=:cs2 and b.yhh=:cs3 and a.djh=b.djh'
'group by a.fkfsmc'
'')
UpdateObject = UpdateSQL1
Left = 528
Top = 213
ParamData = <
item
DataType = ftDateTime
Name = 'cs1'
ParamType = ptUnknown
end
item
DataType = ftDateTime
Name = 'cs2'
ParamType = ptUnknown
end
item
DataType = ftString
Name = 'cs3'
ParamType = ptUnknown
end>
end
object UpdateSQL1: TUpdateSQL
Left = 560
Top = 213
end
object DataSource2: TDataSource
DataSet = Query2
Left = 528
Top = 245
end
object Query3: TQuery
DatabaseName = 'aa'
SQL.Strings = (
'SELECT count(djh) as djsl, sum(sl) as sle, sum(je) as jee, sum(z' +
'ke) as zkee, sum(fwfe) fwfee, sum(se) as see'
'FROM dcd dcd'
'where rq>=:cs1 and rq<=:cs2 and fkbz=1 and zfbz=0'
'')
Left = 56
Top = 133
ParamData = <
item
DataType = ftDateTime
Name = 'cs1'
ParamType = ptUnknown
end
item
DataType = ftDateTime
Name = 'cs2'
ParamType = ptUnknown
end>
end
object Query4: TQuery
DatabaseName = 'aa'
SQL.Strings = (
'SELECT yhmc, yhm'
'FROM dbo.userwj Dbo_userwj')
Left = 184
Top = 32
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -