FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#2
|
||||
|
||||
Pudieras Probar
Hola creo que pudieras probar en el evento on change del edit algo así
Var Valor,Valor1 : String; begin valor := Edit1.text; Valor1 := Valor; inc(valor1[length(Valor1)]); Tabla.Filter := 'Campo >= '+QuotedStr(Valor)+ ' and Campo < ' QuotedStr(valor1); Tabla.Filtered := True //Donde campo es el campo por donde vas a filtrar //Se pone lento en dependencia de la cantidad de registros que tenga la tabla. end; mas o menos así Un saludo
__________________
Lo importante no es llegar primero, sino saber llegar. Para que puedas llegar mejor lee la Guia de Estilo Última edición por yusnerqui fecha: 10-04-2004 a las 17:13:38. Razón: QuotedStr |
|
|
|