Filtrar Datos DBGRID

[crc2005]

Por favor alguien me podria ayudar tengo Form con un Dbgrid , Boton1 y tedit
DBGRID: jala datos de un tabla Usuarios con campos (Codigo,Nombre,Direccion,Estado, Foto)
Lo que nesecito es que al ingresar un nombre en el tedit al darle click en el boton1 se filtre solo los que coincidan con este.
Ejm atos del Campo Nombre
Juan
Jimenes
Gimenes
Mendoza
En el tedit Ingreso: me
y se filtre solo Jimenes,Gimenes y Mendoza,
me posiciono en un de ellos (en el DBGRID) y doy doble click y abre el form de ingreso para poderlo editar.
Gracias por su ayuda de antemano, espero que me haya expresado bien
Saludos

Carlos

[luisgutierrezb]

busca la propiedad Filter del Dataset que estes utilizando, ya sea BDE, ADO, etc

[Neftali [Germán.Estévez]]

Lo más sencillo es que conectes el DBGrid a una consulta, en lugar de a la tabla.
Inicialmente puedes leer todos los datos con una consulta de este estilo:

Código SQL [-]
  Select * from Usuarios

Cuando el usuario coloca una cadena en el Edit y sale (captura el OnExit, por ejemplo) modifica la consulta. Si en el Edit hay algo, la consulta debe ser del estilo a:

Código Delphi [-]
  Query.SQL.Text := 'SELECT * from usuarios where nombre like ' + 
                            QuotedStr('%' + Edit.text + '%');

Si en el edit no hay nada, vuelves a colocar la consulta inicial.
Pruebalo y si tienes problemas ya dirás...
No comentas qué BD estás utilizando.

[crc2005]

Empezado por Neftali

Lo más sencillo es que conectes el DBGrid a una consulta, en lugar de a la tabla.
Inicialmente puedes leer todos los datos con una consulta de este estilo:


Código SQL [-]
Select * from Usuarios






Cuando el usuario coloca una cadena en el Edit y sale (captura el OnExit, por ejemplo) modifica la consulta. Si en el Edit hay algo, la consulta debe ser del estilo a:


Código Delphi [-]
Query.SQL.Text := 'SELECT * from usuarios where nombre like ' +
QuotedStr('%' + Edit.text + '%');





Si en el edit no hay nada, vuelves a colocar la consulta inicial.
Pruebalo y si tienes problemas ya dirás...
No comentas qué BD estás utilizando.

Gracias
Pero tengo una duda donde pongo
Query.SQL.Text := 'SELECT * from usuarios where nombre like ' +


QuotedStr('%' + Edit.text + '%');
en el evento click del boton y no me filtra ya lo probe pero nada
La basede datos es Paradox
Gracias

[Neftali [Germán.Estévez]]

Te estaba dando la solución y no recordaba que ese ejemplo lo colgué hace tiempo en mi página Web.
Revisa en esta página el ejemplo que se llama "Generar una búsqueda (Like *) utilizando SQL". EStá con código fuente, así que puedes revisarlo y destriparlo a tu gusto.

[crc2005]

Gracias ya baje el ejemplo, pero ayer pude con la yuda que me dieron
solo aumente el cerrar y luego abrir la consulta
Query.SQL.close;
Query.SQL.Text := 'SELECT * from usuarios where nombre like ' +
QuotedStr('%' + Edit.text + '%');
Query.SQL.open;
Gracias a todos es un buen foro
Saludos

[[Caral]]

Hola crc2005
Tienes una tabla Usuarios, Al ejecutar el from, el dbgrid muestra el contenido de esta tabla, seguro con Table1.Open;.
Bueno dices que:

Lo que nesecito es que al ingresar un nombre en el tedit al darle click en el boton1 se filtre solo los que coincidan con este.

El boton a mi manera de ver no lo necesitas, veamos, tienes un edit1, en el evento OnChance de este pones:

Código Delphi [-]
If (Edit1.text <> '') then
    TUsuarios.Filter := 'Nombre Like '''+ Edit1.Text + '*''';

Esto es suponiendo que la tabla se llame TUsuarios, por supuesto que tienes que poner el nombre que tenga tu tabla.
Al ejecutar el programa lo que pongas en el edit1 se ira filtrando, si buscas el nombre Juan, con solo poner la ( J ) te mostrara todos los nombres que empiecen con J, Si pones (Ju) filtrara los que coincidan y asi sucesivamente.
Saludos

[[Lepe]]

Caral, ¿Por qué usar un filtro en lugar de una consulta?

[[Caral]]

Hola Lepe, en realidad el razonamiento biene de lo que necesira nuestro amigo:

Lo que nesecito es que al ingresar un nombre en el tedit al darle click en el boton1 se filtre solo los que coincidan con este

En realidad tu duda es razonable, de todos modos se necesita hacer de una u otra manera la consulta, lo que pienso es que si tiene ya la tabla abierta por que no hacer simplemente un filtro, es simple y funciona.
Saludos Maestro

[[Lepe]]

Un filtro se ejecuta del lado cliente, por tanto, si está en red, viajará todos los registros de la tabla y despues se hará la restricción del filtro. Si no está en red, se seleccionan todos los registros y despues se hace el filtro... es un desperdicio de recursos y tiempo (desde mi punto de vista).

Al menos en paradox, no se permiten filtros con comodines del tipo "%fer%", (tú utilizas el asterisco... será que usas Access ) sino que habría que crear un filtro tal que así:

Código Delphi [-]
table1.filtered := false;
table1.filter := nombre > 'P' and nombre <'S';
table.filtered:= true;

que no es lo que pide, y además es más costoso para el programador.

Por otra parte, no puedes compartir ese TTable con otras ventanas, porque siempre mostraría los datos filtrados, y tarde o temprano necesitará un filtrado distinto para cada ventana.

Una consulta es totalmente independiente de la tabla, incluso la tabla puede estar cerrada y la consulta funciona perfectamente.

Una Consulta puedes ordenarla ascendente y descendentemente, por el campo "filtrado" o por otro cualquiera, usando los índices que se hayan creado para ese propósito en la BBDD. El filtro creo recordar, no usa los índices.

La consulta puedes dejarla preparada para tener un acceso más rápido de ejecución, esto solo funciona con parámetros:

Código Delphi [-]
query1.sql.text := 'select * from tabla where campo like :nombre order by Nombrecliente';
if not query1.Prepared then 
  query1.Prepare;

A partir de ahora solo hay que hacer:

Código Delphi [-]
query1.Close;
query1.parambyname('nombre').asString:= edit1.text+'%';
query1.Open;

Amén de poder usar inner joins en lugar de campos Lookup y restringir los datos con mucha más comodidad.

Saludos.

[Matiax13]

donde tengo q poner ese codigo?

[ecfisa]

Hola Matiasx13, bienvenido a Club Delphi

La ubicación del código dependerá de la funcionalidad de tu aplicación, tendrías que dar mas datos. Por favor lee nuestra guía de estilo.

Saludos y gracias por tu colaboración

[Matiax13]

hola, muchas gracias por contestar
tengo un data module con 1 adoconnection, un adoquery(en el SQL :select * from tabla), 1 datasourse y esta todo bien conectado y el dbgrid al datasourse
lo q quiero es buscar en la tabla por el campo ''codigo'', pero uso el codigo este:
y lo pongo en onchange del edit

1. begin
2. query1.Close;
3. query1.SQL.Clear;
4. query1.SQL.Add('SELECT campo from tabla');
5. query1.SQL.Add(' where campo LIKE ' +quotedstr('%' + edit1.Text + '%')+' ');
6. query1.Open;
7. end;

y me da q al campo ''codigo'' le falta operadores o algo asi, o si no q esta perdido el campo ''articulo''

muchas gracias desde ya!!!

[Casimiro Notevi]

Empezado por Matiax13

hola

Bienvenido a clubdelphi, como siempre aconsejamos a los nuevos, no olvides leer nuestra guía de estilo, gracias por tu colaboración

Recuerda poner los tags al código fuente, ejemplo:



Gracias

[Casimiro Notevi]

Lee la guía de estilo, gracias

Empezado por Matiax13

y me da q al campo ''codigo'' le falta operadores o algo asi, o si no q esta perdido el campo ''articulo''

No somos adivinos, copia y pega el mensaje de error exacto.
Y procura escribir correctamente, gracias

Lee la guía de estilo, gracias

[Matiax13]

disculpa, no tengo la menor idea de lo q tengo q hacer(de la imagen q subiste)?, ni donde?.

queria pegar la imagen q me subiste pero no tengo permitido todavia subir imagen, eso me dijo.
ley algo de la guia de estilo, pero nunca pregunte nada, ya vi todos los temas relacionado y no vi mi solucion, y decidi preguntar

[Casimiro Notevi]

Pues pon el código que usas, recuerda que no tenemos una bola de cristal

[Matiax13]

hola, tenes razon, nose como hacerme entender!
voy de nuevo, te comento lo q hice:
data moldule (adoconnetion(conecto la tabla, pruebo coneccion :satifactoria), adoquery1((SLQTStrings), pongo: select * from mi tabla. Conecction: adoconnecton. Active: True )), datasourse1(dataset: adoquery).
Un form1: dbgrid(datasourseataModule.datasourse1) y un edit. Y de ahi alta, baja y modificacion

Lo q quiero es buscar en el dbgrid por el campo ''codigo''.

mi tabla se llama: Articulos
los campos son:
Codigo
Articulos
Cantidad
Precio
Precio de venta
Telle
Tipo
fecha
hora

espero q me entiendas, de ahi nose mas, solo busco ejemplos q me vayan guiando

[Casimiro Notevi]

Empezado por Matiax13

Lo q quiero es buscar en el dbgrid por el campo ''codigo''.

¿Buscar en el dbgrid? Supongo que quieres buscar en la base de datos (el dbgrid es solo un visor de lo que tiene el dataset asociado al mismo, mediante su datasource)
Pues mira este hilo desde el principio, se explica con ejemplos, particularmente en el mensaje #7

[Matiax13]

muchas gracias me fije lo q me dijiste y me di cuenta q donde yo ponia la tabla tenia q poner *
muchas gracias por tu tiempo!!