skycwbb1.dfm
来自「日昌餐饮管理系统是用Delphi7+SQL写的管理系统」· DFM 代码 · 共 1,020 行 · 第 1/3 页
DFM
1,020 行
Attributes = [paNullable]
DataType = ftDateTime
Precision = 16
Size = 16
Value = Null
end
item
Name = 'cs22'
Attributes = [paNullable]
DataType = ftDateTime
Precision = 16
Size = 16
Value = Null
end
item
Name = 'cs23'
Attributes = [paNullable]
DataType = ftDateTime
Precision = 16
Size = 16
Value = Null
end
item
Name = 'cs24'
Attributes = [paNullable]
DataType = ftDateTime
Precision = 16
Size = 16
Value = Null
end
item
Name = 'cs25'
Attributes = [paNullable]
DataType = ftDateTime
Precision = 16
Size = 16
Value = Null
end
item
Name = 'cs26'
Attributes = [paNullable]
DataType = ftDateTime
Precision = 16
Size = 16
Value = Null
end
item
Name = 'cs27'
Attributes = [paNullable]
DataType = ftDateTime
Precision = 16
Size = 16
Value = Null
end
item
Name = 'cs28'
Attributes = [paNullable]
DataType = ftDateTime
Precision = 16
Size = 16
Value = Null
end
item
Name = 'cs29'
Attributes = [paNullable]
DataType = ftDateTime
Precision = 16
Size = 16
Value = Null
end
item
Name = 'cs30'
Attributes = [paNullable]
DataType = ftDateTime
Precision = 16
Size = 16
Value = Null
end
item
Name = 'cs31'
Attributes = [paNullable]
DataType = ftDateTime
Precision = 16
Size = 16
Value = Null
end
item
Name = 'cs32'
Attributes = [paNullable]
DataType = ftDateTime
Precision = 16
Size = 16
Value = Null
end
item
Name = 'cs33'
Attributes = [paNullable]
DataType = ftDateTime
Precision = 16
Size = 16
Value = Null
end
item
Name = 'cs34'
Attributes = [paNullable]
DataType = ftDateTime
Precision = 16
Size = 16
Value = Null
end
item
Name = 'cs1'
Attributes = [paNullable]
DataType = ftDateTime
Precision = 16
Size = 16
Value = Null
end
item
Name = 'cs2'
Attributes = [paNullable]
DataType = ftDateTime
Precision = 16
Size = 16
Value = Null
end>
Left = 296
Top = 83
end
object ADODataSet3: TADODataSet
Connection = mainForm.RJSADO
CursorType = ctStatic
CommandText =
'select yhm as '#21495#30721','#13#10'"'#25910#38134#21592'" =(select yhmc from userwj where a.y' +
'hm=yhm),'#13#10'"'#27880#20876#38144#21806'" = (select sum(je) from dcd where a.yhm=yhh and ' +
'rq>=:cs5 and rq <=:cs6 and fkbz=1),'#13#10'"'#20248#24800#25968#37327'" = (select count(djh)' +
' from dcd where je<>dj and yhh=a.yhm and zfbz=0 and fkbz=1 and r' +
'q>=:cs7 and rq <=:cs8),'#13#10'"'#20248#24800#37329#39069'" = (select sum(dj - je ) from dcd' +
' where je<>dj and yhh=a.yhm and zfbz=0 and fkbz=1 and rq>=:cs9 a' +
'nd rq <=:cs10),'#13#10'"'#31614#21333#25968#37327'" = 0,'#13#10'"'#31614#21333#37329#39069'" = 0,'#13#10'"'#24223#21333#25968#37327'" = (select coun' +
't(distinct djh) from dcd where yhh=a.yhm and zfbz=1 and fkbz=0 ' +
'and rq>=:cs11 and rq <=:cs12),'#13#10'"'#24223#21333#37329#39069'" = (select sum( je ) from ' +
'dcd where yhh=a.yhm and zfbz=1 and fkbz=0 and rq>=:cs13 and rq ' +
'<=:cs14),'#13#10'"'#36864#21333#25968#37327'" = (select count(distinct djh) from dcd where ' +
'yhh=a.yhm and zfbz=1 and fkbz=1 and rq>=:cs15 and rq <=:cs16),'#13#10 +
'"'#36864#21333#37329#39069'" = (select sum( je ) from dcd where yhh=a.yhm and zfbz=1 ' +
'and fkbz=1 and rq>=:cs17 and rq <=:cs18),'#13#10'"'#20854#20182'" = (select' +
' sum(mlje) from new_djh b, dcd c where b.djh=c.djh and a.yhm=c.y' +
'hh and c.rq>=:cs19 and c.rq <=:cs20),'#13#10'"'#23454#25910#37329#39069'" =(select sum( fkj' +
'e) from fkwj where yhh=a.yhm and rq>=:cs21 and rq <=:cs22),'#13#10'"'#22530 +
#39135#25968#37327'" = (select count(djh) from dcd where yhh=a.yhm and zfbz=0 a' +
'nd fkbz=1 and wmbz=0 and rq>=:cs23 and rq <=:cs24),'#13#10'"'#22530#39135#37329#39069'" = (' +
'select sum( je ) from dcd where yhh=a.yhm and zfbz=0 and fkbz=1' +
' and wmbz=0 and rq>=:cs25 and rq <=:cs26),'#13#10'"'#22806#21334#25968#37327'" = (select co' +
'unt(djh) from dcd where yhh=a.yhm and zfbz=0 and fkbz=1 and wmb' +
'z=1 and rq>=:cs27 and rq <=:cs28),'#13#10'"'#22806#21334#37329#39069'" = (select sum( je ) ' +
'from dcd where yhh=a.yhm and zfbz=0 and fkbz=1 and wmbz=1 and ' +
'rq>=:cs29 and rq <=:cs30),'#13#10'"'#21333#22343#20132#26131#39069'" = (select sum( je ) / count(' +
'distinct djh ) from dcd where yhh=a.yhm and zfbz=0 and fkbz=1 ' +
' and rq>=:cs31 and rq <=:cs32),'#13#10'"'#20154#22343#20132#26131#39069'" = (select sum( dcd.je )' +
' / sum(distinct new_djh.xfrs ) from dcd, new_djh where a.yhm=' +
'dcd.yhh and new_djh.djh=dcd.djh and dcd.zfbz=0 and dcd.fkbz=1 a' +
'nd dcd.rq>=:cs33 and dcd.rq <=:cs34)'#13#10#13#10'from userwj a'#13#10'group by ' +
'yhm'#13#10'having (select sum(je) from dcd where a.yhm=yhh and rq>=:c' +
's1 and rq <=:cs2 and fkbz=1) >0'#13#10
Parameters = <
item
Name = 'cs5'
Size = -1
Value = Null
end
item
Name = 'cs6'
Size = -1
Value = Null
end
item
Name = 'cs7'
Size = -1
Value = Null
end
item
Name = 'cs8'
Size = -1
Value = Null
end
item
Name = 'cs9'
Size = -1
Value = Null
end
item
Name = 'cs10'
Size = -1
Value = Null
end
item
Name = 'cs11'
Size = -1
Value = Null
end
item
Name = 'cs12'
Size = -1
Value = Null
end
item
Name = 'cs13'
Size = -1
Value = Null
end
item
Name = 'cs14'
Size = -1
Value = Null
end
item
Name = 'cs15'
Size = -1
Value = Null
end
item
Name = 'cs16'
Size = -1
Value = Null
end
item
Name = 'cs17'
Size = -1
Value = Null
end
item
Name = 'cs18'
Size = -1
Value = Null
end
item
Name = 'cs19'
Size = -1
Value = Null
end
item
Name = 'cs20'
Size = -1
Value = Null
end
item
Name = 'cs21'
Size = -1
Value = Null
end
item
Name = 'cs22'
Size = -1
Value = Null
end
item
Name = 'cs23'
Size = -1
Value = Null
end
item
Name = 'cs24'
Size = -1
Value = Null
end
item
Name = 'cs25'
Size = -1
Value = Null
end
item
Name = 'cs26'
Size = -1
Value = Null
end
item
Name = 'cs27'
Size = -1
Value = Null
end
item
Name = 'cs28'
Size = -1
Value = Null
end
item
Name = 'cs29'
Size = -1
Value = Null
end
item
Name = 'cs30'
Size = -1
Value = Null
end
item
Name = 'cs31'
Size = -1
Value = Null
end
item
Name = 'cs32'
Size = -1
Value = Null
end
item
Name = 'cs33'
Size = -1
Value = Null
end
item
Name = 'cs34'
Size = -1
Value = Null
end
item
Name = 'cs1'
Size = -1
Value = Null
end
item
Name = 'cs2'
Size = -1
Value = Null
end>
Left = 256
Top = 80
end
object ADOQuery1: TADOQuery
Connection = mainForm.RJSADO
Parameters = <>
SQL.Strings = (
'select * from userwj'
'order by yhm')
Left = 136
Top = 80
end
end
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?