Delphi Adoquery 中 Filter like 一样结果 （Filter 中实现模糊查询）

 不支持 Filter = 'name like'    需要模糊查询只有' name = A*' 匹配只能从第一个字母开始，无法达到要求.后来在OnFilterRecord中解决

 TQuery.Filtered := False;

TQuery.Filtered := True;

会触发OnFilterRecord事件

procedure OnFilterRecord(DataSet: TDataSet; Accetp:Boolean)
begin

 Accept := False;//所以值不显示
 if  Pos ('abc',DataSet.FieldsByName('name1').AsString) > 0 then
　  Accept := True;

end;

 实现

---

---

1. 方法

2. 方式