如何使用DBGridEH.STFilter?(过滤)

Question

我看了Demo，但我还是死活弄不出来。高手救命！
我用的是Ehlib3.6,过滤行下拉框出来了,数据也可以选，就是不起作用?请教高手怎么解决啊?

Answer 1

Procedure Tform1.DBGrid1TitleClick(column:Tcolumn);
 var
   s:string;
begin
   s:trim(column.field.fieldName);
   with query1 do
   begin
       sql.clear;
        sql.add('select * from student _info wher if like ''' + format('%s',[Trim(Edit1.text)])+'%''');
        sql.add(format(' order by %s',[s]));
        open;
   end;
end;
end.

Answer 2

initialization
  DBGridEhDefaultStyle.FilterEditCloseUpApplyFilter := True;