Delphi 模糊查询和字段查询

本文整理自网络，侵删。

 
procedure TFrmain.scGPEdit1Change(Sender: TObject);
var
  ASql, AKey: string;              //模糊查询和字段查询
const
  vsql1: string = 'select * from delphi where Title like ';
  vsql2: string = 'select * from delphi';
begin
  AKey := Trim(scGPEdit1.Text); //获取关键词
  if scGPEdit1.Text = '' then
    ASql := vsql2
  else
    ASql := vsql1 + QuotedStr('%' + AKey + '%');
  with dm.FDQuery1 do   //开始查询
  begin
    Close;
    SQL.Text := ASql;
    Open;
  end;
end;

来源 https://www.cnblogs.com/windson/p/12639462.html
 

相关阅读 >>

Delphi winapi: getmodulefilename、getmodulehandle

Delphi tidhttpserver开发http服务端外网无法访问

Delphi 获取文件大小方法

Delphi程序版本信息设置说明

Delphi 的字符及字符串 - char、ansichar、widechar、pchar、pansichar、pwidechar

Delphi中从windows资源管理器中拖放图片到timage控件上

Delphi下程序内存泄露报告

Delphi xe5实现按android的back键无法退出关闭程序

Delphi 取字符串中间

Delphi kbmmemtable的简单应用（增删改查示例）

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi 模糊查询和字段查询