[ruina]

no es dificil, simplemente debes poner una condición en el filter y llamar a FindFirst - FindNext.

No es necesario que la propiedad Filtered este a true (aunque con eso conseguirias ver en un grid solo aquellos telefonos que cumplen la condición)

seria algo asi:

Código Delphi [-]
Inicio.Personas.Filter:='Tlf = '+QuotedStr(PTlf.text);
Inicio.Personas.FindFirst;
 
...
...//boton siguiente 
Inicio.Personas.FindNext;