1. 首页 > 星座知识 > 文章页面

delphi多查询条件自由组合问题(delphi if多个条件)

delphi 实现 一个按钮将多个txt文件通过文件内部的标识将各条信息组合起来,并用memo显示出来

大家好,今天给各位分享delphi多查询条件自由组合问题的一些知识,其中也会对组合查询进行解释,文章篇幅可能偏长,如果能碰巧解决你现在面临的问题,别忘了关注本站,现在就马上开始吧!

本文目录

数据库实验:统计查询和组合查询delphi多查询条件自由组合问题数据库实验:统计查询和组合查询

1统计各出版社出版图书的数量。

Delphi和C 开发辅助 GExperts 下载 v1.3.7 全版本

SELECT

出版社.出版社名称,

COUNT(图书.书号) AS出版图书的数量

FROM

图书,出版社

WHERE

图书.出版社编号=出版社.编号

GROUP BY

出版社.出版社名称

2列出多人合著的图书书号和价格。

SELECT

书号,

价格

FROM

图书

GROUP BY

书号,

价格

HAVING

COUNT(作者编号)>= 2

3列出高教出版社出版的最贵图书信息。

SELECT

图书.*

FROM

图书,出版社

WHERE

图书.出版社编号=出版社.编号

AND出版社.出版社名称='高教出版社'

AND图书.价格 IN(SELECT MAX(价格) FROM图书 T WHERE T.出版社编号=出版社.编号)

4列出所有图书都是30元以上的出版社名称。

SELECT

出版社.出版社名称

FROM

图书,出版社

WHERE

图书.出版社编号=出版社.编号

GROUP BY

出版社.出版社名称

HAVING

SUM( CASE WHEN图书.价格> 30 THEN 0 ELSE 1 END)= 0

delphi多查询条件自由组合问题

据个人理解,貌似不是什么大难题,你只要检查生成的语句中,最后一个字符是否是逗号,如果是逗号就删除。

示例代码如下:

s1:=CheckBox1.Hint+''+CheckBox2.Hint+''+CheckBox3.Hint+''+CheckBox4.Hint+''+CheckBox5.Hint+''+CheckBox6.Hint+''+CheckBox7.Hint+''+CheckBox8.Hint;

ifs1[Length(s1)]=','then

s1:=Copy(s1,1,Length(s1)-1);

s2:=CheckBox1.HelpKeyword+''+CheckBox2.HelpKeyword+''+CheckBox3.HelpKeyword+''+CheckBox4.HelpKeyword+''+CheckBox5.HelpKeyword+''+CheckBox6.HelpKeyword+''+CheckBox7.HelpKeyword+''+CheckBox8.HelpKeyword;

ifs2[Length(s2)]=','then

s2:=Copy(s2,1,Length(s2)-1);

sql:='select'+s1+''+'from表1a,表2bwherea.key=b.keygroupby'+s2;

ADOQuery1.sql.add(sql);

顺便提一句:

ifCheckBox1.Checkedthen

就可以了,不用= true

END,本文到此结束,如果可以帮助到大家,还望关注本站哦!

delphi TOraQuery执行SQL怎样设置参数 动态执行SQL

联系我们

Q Q:

微信号:

工作日:9:30-18:30,节假日休息

微信