对整数型数据进展过滤

对整数型数据进行过滤
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 如果是字符串是可以，如果是整数型就会再现问题
[解决办法]
看不懂问题！
[解决办法]
在过滤事件里写代码。用posof函数实现like功能。