[nemesio]

Para filtrar debes tener la propiedad Filtered:=True
Ejemplo:

Código Delphi [-]
procedure TFormAgenda.Button1Click(Sender: TObject);
begin
   Databases.TableAgenda.Filtered:=True;
   Databases.TableAgenda.Filter:=  CondicionDelFiltro ;
 
end;

Suerte