Filtrar teléfono con Mask Edit

[*Caro*]

Empezado por Lepe

que yo sepa, la propiedad filter no permite el uso de comodines en la búsqueda.... aunque puedo equivocarme, ya que no sé en qué base de datos trabajas ni demás; por defecto el TTable de delphi no puede, tienes que usar una consulta (TQuery busca en el foro).

Hola Lepe, hace tiempo hice pruebas sobre like y los comodines en el Filter del Table y si funciona, el unico problema que veo es cuando se envía vacío donde debería mostrarte todos los registros, en este caso te da el error que ha puesto silver07, pero también sale ese error si no se le pone comillas aunque sea campo Integer se le debe poner las comillas.

Código Delphi [-]
 Dmodulo.tblContactos.Filtered := False;
 if MEditTel.Text='' then
  Dmodulo.tblContactos.Filter := ''
 else
  Dmodulo.tblContactos.Filter := 'telefono1 like '+QuotedStr(MEditTel.Text+'%');
 Dmodulo.tblContactos.Filtered := True;

Saluditos