delphi中checklistbox构造sql语句中in实例下载

[weixin_39820780]

在delphi查询功能设计过程中，对于sql语句中的in的构造，网上没有现成的示例，就自己写了一个简单的用checklistbox来生成in()括号里的记录，最终构造的SQL为 ：select * from 表1 where name in (aaaa,cccc);
这个简单功能的难点在于逗号的生成；
第一次上传，如果有更好的实现方法，请勿见笑。
相关下载链接：//download.csdn.net/download/maxthonghh/8107769?utm_source=bbsseo