Filtrar datos en una tabla paradox

[Niko]

Hola de Nuevo:

He probado a poner esto:

Table1.Filter:='Concepto like '+QuotedStr('%'+Edit1.text+'%');
Table1.Filtered:= True;

En los eventos OnKeyPress y luego en OnChange del Edit1 y me sale el siguiente error cuando pulso cualquier tecla estando el foco en este Edit:

Operation Not applicable.

Que puedo hacer??

Muchas Thank`s.
Att. Jorge

[Niko]

Aclaro que compilar, compila perfectamente pero al pulsar cualquier tecla en ese edit sale el error: Operation Not Applicable.

A lo mejor hay que cerrar la tabla antes de hacer la búsqueda o no sé.

Alguien me puede hechar una manilla?? He probado todos los ejemplos que salen en el hilo del link que me has puesto y en todos sale este error. Recuerdo que yo necesito filtrar la tabla mientras se escribe en el edit.

Muchas Thank`s.
Salu2.

[vtdeleon]

Saludos

Hice una prueba, intenta esto:

Código Delphi [-]
Table1.Filter:='Concepto= '+QuotedStr('*'+Edit1.text+'*');
Table1.Filtered:= True;

[Niko]

Hola otra vez:

Con ese codigo no da ningún error. Pero por el contrario no filtra nada. Tengo 7 entradas que empiezan por 'D' y al poner en el Edit: 'D', en el DBGrid desaparecen todas las entradas y se queda en blanco.

Agradezco mucho tu ayuda. Espero me puedas responder.

Salu2

[vtdeleon]

Saludos

Como solo quieres que empiense por X's caracteres, quita el 1er asterisco.

Nt: En modo de dise~o puedes ir probando, intentalo.

[Niko]

Hola:

Muchas Gracias, ahora si sale.

Pero , ahora el problema es que cuando dejo el edit en blanco, no sale nada, y lo que quiero es que si el Edit esta en blanco lo vuelva a mostrar todo. (El codigo lo he puesto en el evento OnChange del Edit).

De todas maneras si esto es muy dificil pongo un boton que quite el filtro y listo, aunque me gustaría que se pudiera hacer así.

Saludos.

--------------------------

P.D: Creo que puede quedar solucionado poniendo en el evento OnKeyPress del Edit:

If Edit2.Text = '' Then
Table1.Filtered:= False;

Asi si se borra, ya se esta pulsando la tecla BackSpace y si el edit detecta que no hay texto se quita el filtro de la tabla.

Saludos.

[vtdeleon]

Puedes poner una condicion que evalue si el edit tiene o no texto, si no tiene pones el filter false y listo