对整数型数据进行过滤

Question

var ss:string;
begin
  ss:=trim(Edit2.Text);
   with ADOQuery1  do
   begin
     Filtered := False;
     if ss<>'' then
       begin
           //Filtered:='spbm like ''*'+ss+'*'' or sptm like ''*'+ss+'*'' or spmc like ''*'+ss+'*'' or py like ''*'+ss+'*''';
           Filter :=' (f_type like ''*'+ss+'*'') ';
       end
     else
       Filter := '';
     Filtered := true;
   end;
   FocusControl(edit2) ;
end;
f_type 如果是字符串是可以，如果是整数型就会再现问题

Answer 1

在过滤事件里写代码。用posof函数实现like功能。