filtrar campos enteros

[gonza_619]

hoal a todos bueno miren estoy intentando filtrar un campo tipo entero, pero solo se aherlo con campos string:

Table4.Filter:='nombre= '+QuotedStr(Edit5.text+'*');
Table4.Filtered:= True;

ahora con entero seria


Table4.Filter:='codigo_cleinte= '+QuotedStr(Edit6.text+'*');
Table4.Filtered:= True;

bien creo q habria q pasarlo a entero pero nose como qedaria , espero puedan ayudarme gracias

[marcoszorrilla]

Table4.Filter:='codigo_cliente= '+StrToInt(Edit6.text);
Table4.Filtered:= True;


Un Saludo.

[gonza_619]

bien me dice error incompatible ,str and int, pero lo estoy pasando a entero, no entiendo porq, y el campo es entero y coloco un valor enteor en el edit, tendria q poder ejecutarse

[Caro]

Hola gonza_619, solo debes quitar QuotedStr y seguir manejandolo como String ya que a Filter debes pasarle un String.


Table4.Filter:='codigo_cleinte= '+Edit6.text;
Table4.Filtered:= True;


Saluditos

[cloayza]

Table4.Filter:='codigo_cliente= '+StrToInt(Edit6.text);



Exijo una explicación!!! :D:D:D

[gonza_619]

bien pero cuando quieri
o borrar el edit ara colocar un numero , me dice edit not found!, es como que hago click en el edit y ya me lo filtra, no me deja poner nada

[Caral]

Hola

Table4.Filtered:= False;
Table4.Filter:='codigo_cleinte Like '+Edit6.text;
Table4.Filtered:= True;
Saludos

[gonza_619]

bien gracias de nuevo, esta vez funciono es decir lo filtro pero cuando lo quise borrar, me dio que expression expected but nothing found, yo en el evento on key press tengo

If Edit5.Text = '' Then
Table4.Filtered:= False;

, bueno gracias por la ayuda anterior

[Caral]

Hola

If Edit5.Text <> ' ' Then
begin
Table4.Filtered:= False;
Table4.Filter:='codigo_cleinte Like '+Edit6.text;
Table4.Filtered:= True;
end;
Saludos
Quita el evento onkeypress