Pones un botón.
Pulsas doble click sobre él (para acceder al evento OnClick)
Pones el código, quedando similar a esto:
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
begin
with Table1 do begin
Filtered := False;
Filter := 'Campo = 1';
Filtered := True;
end;
end;
Sustituyendo lo que hay entre comas simples en "Campo = 1" por tu expresión.
Esto lo que hace es desactivar el filtro del TTable, indicarle una restricción y activar el filtro nuevamente.
Espero que te quede algo mas claro.
Saludos.