Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 07-09-2012
JairoC JairoC is offline
Miembro
NULL
 
Registrado: oct 2011
Posts: 45
Poder: 0
JairoC Va por buen camino
Hacer consultas con muchos filtros posibles

Hola gente del foro!!! Estoy haciendo un sistemita de encuestas.... Y en las consultas no le entiendo mucho...
Por ejemplo quiero que me aparezcan las personas MAYORES a 50, que sean MASCULINAS, QUE NO POSEAN OBRA SOCIAL, ETC... TODOS LOS FILTROS POSIBLES..
Algunos de los campos que tengo son:
EDAD, SEXO, OBRASOCIAL, LIMITACIONPARAVER... Son muchos...

Quisiera que me ayuden... Un saludo!!!
Responder Con Cita
  #2  
Antiguo 07-09-2012
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Poder: 25
Caral Va por buen camino
Hola
No entiendo cual es la ayuda que necesitas.
Me imagino que tienes un edit o un combobox por cada campo y que dependiendo de se contenido se hara el filtro???
saludos
__________________
Siempre Novato
Responder Con Cita
  #3  
Antiguo 07-09-2012
JairoC JairoC is offline
Miembro
NULL
 
Registrado: oct 2011
Posts: 45
Poder: 0
JairoC Va por buen camino
Perdón, no me expliqué bien.. Así es tengo muchos combobox, uno para cada campo de la base de datos...
Responder Con Cita
  #4  
Antiguo 07-09-2012
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Poder: 25
Caral Va por buen camino
Hola
Y que necesitas ?
La sentencia sql para el filtro por query ?.
hacerlo por filtro por table ?
No dices que bd usas ni das muchas explicaciones, recuerda, mientras mas expliques mas sencillo sera tratar de ayudar.
saludos
__________________
Siempre Novato
Responder Con Cita
  #5  
Antiguo 07-09-2012
JairoC JairoC is offline
Miembro
NULL
 
Registrado: oct 2011
Posts: 45
Poder: 0
JairoC Va por buen camino
La sentencia para un Query... Uso firebird... uso los dataset, datasourse, query..
Responder Con Cita
  #6  
Antiguo 07-09-2012
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Poder: 25
Caral Va por buen camino
Hola
para esto necesitas que los combobox esten llenos, osea que todos tengan algun dato, de lo contrario te dara un error:

Código Delphi [-]
    IBQuery1.SQL.Text := 'Select * from TUTABLA where EDAD :E, SEXO = :S, OBRASOCIAL = :O, LIMITACIONPARAVER = :L';
    IBQuery1.Params[0].Value := Combobox1.Text;
    IBQuery1.Params[1].Value := Combobox2.Text;
    IBQuery1.Params[2].Value := Combobox3.Text;
    IBQuery1.Params[3].Value := Combobox4.Text;
    IBQuery1.Open;

esto con cada campo que quieres ver en la consulta.
Espero lo entiendas.
saludos
__________________
Siempre Novato
Responder Con Cita
  #7  
Antiguo 07-09-2012
JairoC JairoC is offline
Miembro
NULL
 
Registrado: oct 2011
Posts: 45
Poder: 0
JairoC Va por buen camino
Si, eso tambien puede suceder de que no selleccione un combobox... Y quiera saber solamente dos parámetros.. A eso quiero llegar de que haya combobox sin elegir...
Responder Con Cita
  #8  
Antiguo 07-09-2012
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Poder: 25
Caral Va por buen camino
Hola
Primero tendrias que revisar que combobox estan llenos, osea, no en blanco.
despues dependiendo de los que esten llenos revisar a que campo corresponde cada combobox
Luego hacer la consulta especificando solo los que esten llenos, segun su campo.
Dificil, pero no imposible.
Saludos
__________________
Siempre Novato
Responder Con Cita
  #9  
Antiguo 07-09-2012
JairoC JairoC is offline
Miembro
NULL
 
Registrado: oct 2011
Posts: 45
Poder: 0
JairoC Va por buen camino
Si, va ser bastante difícil... POrque es una sistema de encuestas para personas en las cuales lleva muchos campos... Muchas gracias por tu ayuda!!! Voy a poner le código en un botón... Le parece?
Responder Con Cita
  #10  
Antiguo 07-09-2012
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Poder: 25
Caral Va por buen camino
Hola
Bien.
Saludos
__________________
Siempre Novato
Responder Con Cita
  #11  
Antiguo 07-09-2012
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Poder: 25
Caral Va por buen camino
Hola
Se me ocurre que podrias crear edits en ejecucion dependiendo de si se modifica (osea cambia) un combobox determinado.
no seri tampoco sencillo pero tal vez mas viable.
Saludos
__________________
Siempre Novato
Responder Con Cita
  #12  
Antiguo 07-09-2012
JairoC JairoC is offline
Miembro
NULL
 
Registrado: oct 2011
Posts: 45
Poder: 0
JairoC Va por buen camino
Saludos! Y gracias por la buena honda!
Responder Con Cita
  #13  
Antiguo 07-09-2012
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Poder: 25
Caral Va por buen camino
Hola
Pon el codigo del boton, ya es tarde, mañana lo veo.
No te preocupes, aqui hay muchos maestros que te ayudaran mucho mejor que yo.
saludos
__________________
Siempre Novato
Responder Con Cita
  #14  
Antiguo 07-09-2012
JairoC JairoC is offline
Miembro
NULL
 
Registrado: oct 2011
Posts: 45
Poder: 0
JairoC Va por buen camino
Hola Amigo!!! Lo pude solucionar!!! Lo que hice fue lo siguiente:
Creé una variable tipo String, a la cual le asigné una consulta que no se modifica:
Código Delphi [-]
Var
ConsultaGeneral:String
begin
  ConsultaGeneral:=' Select * from Personas'; 
end;
Luego en el botón, lo siguiente:
Código Delphi [-]
with (DM2.General)do
           begin
             if ComboBox_SEXO.Text <>'' then
                ConsultaGeneral:= ConsultaGeneral + ' and SEXO STARTING WITH :SEXO ';
             if Edit_EdadEntre.Text<>'' then
               ConsultaGeneral:=ConsultaGeneral + 'and EDAD BETWEEN :EdadDesde ';
             if Edit_EdadHasta.Text<>'' then
                ConsultaGeneral:=ConsultaGeneral + ' and :EdadHasta ';
             if ComboBox_Cobertura.Text<>'' then
                ConsultaGeneral:=ConsultaGeneral + 'and COBERTURA starting with :Cobertura';
              SQL.Clear;
             sql.Add(ConsultaGeneral);
             if ComboBox_SEXO.Text <>'' then
                ParamByName('Sexo').Value:=ComboBox_SEXO.Text;
            // Y ASÍ CON TODOS LOS QUE TENGO
            Open;

MUchas gracias de nuevo por su ayuda!!! Abrazos!!!
Responder Con Cita
  #15  
Antiguo 07-09-2012
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Poder: 25
Caral Va por buen camino
Hola
Yo usaria combobox en todos
Saludos
__________________
Siempre Novato
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Cómo hacer para que muchos checkbox usen la misma función? Shikanda Varios 7 12-09-2007 17:27:48
Consultas o Filtros .... JULIOCTORRESG Varios 10 06-03-2007 12:53:58
Problemas con generadores en relacion Muchos-a-Muchos Hagen Firebird e Interbase 3 30-10-2006 16:47:51
sobre consultas vs filtros. yoyo SQL 1 18-07-2006 20:14:36
consultas con muchos querys gabynuñez Conexión con bases de datos 0 10-06-2005 17:59:02


La franja horaria es GMT +2. Ahora son las 07:09:23.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi