Filtrar datos de una tabla

[DarkByte]

El caso es que una vendedora puede reclutar a una clienta para que se haga vendedora.

El tema es hacer una búsqueda en la tabla por aproximación al nombre y no se cual sería la mejor manera de conseguirlo. La tabla se llama Vendedoras y el campo "De"

[jmariano]

Si no estoy entendiendote mal, para hacer una búsqueda por el nombre de la vendedora (pudiendo especificar cualquier parte del nombre, ya sea el nombre en sí o el apellido, siempre y cuando, claro, almacenes ambas cosas en el mismo campo) podrías usar la propiedad "Filter" y construir el filtro con la cláusula "LIKE":

Código Delphi [-]
procedure frmBuscarVendedora.AceptarClick(Sender: TObject);
begin
  ADOTable1.Filter := '(CampoNombre) LIKE ' + QuotedStr('%' + Edit1.Text + '%');
  ADOTable1.Filtered := True;
end;

De esta manera, el nombre podrá ser buscado por aproximación (ya sea especificando parte del nombre o parte del apellido, etc.), y entre más específico sea el usuario menos registros irá devolviendo. (Acuerdate, eso sí, de cancelar el filtro si quieres mostrar todas las vendedoras).

(En caso de tener el nombre y los apellidos divididos en dos campos, podrías crear un campo calculado con el valor de los dos y hacer la búsqueda por este campo).

Saludos!

[vtdeleon]

Saludos

Empezado por jmariano

Si no estoy entendiendote mal, para hacer una búsqueda por el nombre de la vendedora (pudiendo especificar cualquier parte del nombre, ya sea el nombre en sí o el apellido, siempre y cuando, claro, almacenes ambas cosas en el mismo campo) podrías usar la propiedad "Filter" y construir el filtro con la cláusula "LIKE":

Interesante, (no lo he probado pero) no sabia que se podia utilizar Like en la propiedad Filter

[DarkByte]

He usado

Código Delphi [-]
  dm.Vendedoras.Filter := '(Nombre) LIKE' + QuotedStr('%' + eVendedoras.Text + '%');
  dm.Vendedoras.Filtered := True;

En el OnChange y OnKeyPress y me abofetea con el siguiente error:

"Argumentos incorrectos, fuera del intervalo permitido o en conflicto con otros".

Así, en castellano y todo...

[DarkByte]

Afino más, el error sucede al dispararse el evento. Compilar lo hace perfectamente.

[jmariano]

Te ocurre porque te falta un espacio después del "LIKE" para separar la condición de búsqueda.

Código Delphi [-]
// Acuerdate de poner un espacio despues del 'LIKE'
dm.Vendedoras.Filter := '(Nombre) LIKE ' + QuotedStr('%' + eVendedoras.Text + '%');
dm.Vendedoras.Filtered := True;

Saludos!

[DarkByte]

Funciona a la perfección!!

Muchisimas gracias!

[gonza_619]

Empezado por jmariano

Te ocurre porque te falta un espacio después del "LIKE" para separar la condición de búsqueda.

Código Delphi [-]// Acuerdate de poner un espacio despues del 'LIKE' dm.Vendedoras.Filter := '(Nombre) LIKE ' + QuotedStr('%' + eVendedoras.Text + '%'); dm.Vendedoras.Filtered := True;


Saludos!

hola , miren tengo un problema , es que ahora en vez de filtrar desde una tabla necesito hacerlo con una tabla relacionada, pues tengo una tabla Cursos, y otra Alumno, los Alumnos estan relacionados en la tabla detalle Curso, quero filtrar desde la tabla Curso por el nombre del alumno.
Lo que hice fue agregar un nuevo campo en Curso "nombrealumno", y lo quise filtrar desde ese campo , y me da error(no puede filtrar campo nombrealumno), claro no es el campo original de la tabla sino q lo agrege, pero que solucion habria? ya que necesito filtrar por el nombre del alumno que esta cursando tal curso.
gracias, el codigo es el mismo que esta arriba desde tabla Curso