Delphi多条件模糊查询的实现

多条件模糊查询功能是所有信息系统的标配功能，其核心原理在于如何有效的建立模糊查询的SQL语句。这里把以前经手的项目中的局部代码整理并分享出来，供大家参考复用，欢迎Copy&Paste。

简要说明

接下来展示的Demo有5个数据字段作为模糊查询的条件，任意输入就可以进行多条件组合模糊查询。

代码部分

以下代码在Delphi7下正常运行。需要注意2点：

1. 当全部查询条件为空值时，要对sql语句进行默认查询处理；
2. 组合sql时的转译符号的处理；

procedure TForm_Main.cxButton_QueryClick(Sender: TObject);
var
  sSQL : String;
begin
  sSQL := 'SELECT * FROM goods WHERE 1=1';
// if all condition is blank, query Top 100
  if (cxTextEdit_type