Consulta en SQL con muchos parámetros

[[Lepe]]

¿Que Base de datos estas usando?, Que tipo de acceso, BDE, ADO...

Yo no me preocuparía de ver cual modifica el usuario, ya que eso implica más trabajo para ti, simplemente en el botón buscar, pones algo así:

Código Delphi [-]
  qry.close;
  qry.sql.text := ' select blah from blah where luz = :luz and aseos = :aseos ';
  qry.paramsbyname('luz').value := checkboxLuz.checked;
  qry.paramsbyname('aseos').value := spinedit1.value;
  if not qry.prepared then 
     qry.prepare;
  qry.open;

Espero que sea lo que necesitas, si no ... pues lo dicho por el compañero jachguate

Un saludo

[Ing_Fajardo]

Te recomiendo si estas usando algun servidor SQL, que crees vistas, con eso reduces tu codigo y se hace mas rapido la consulta.

[Ryu]

en el codigo que usas lape:

existe un error a mi parecer pues como el tomara los valores si para consultar si los estas asignando despues de consultar.
ademas para mí es mejor pasar parametros creando los parametros en ejecucion
me explico eje:

 dm.dataset1.Parameters.AddParameter.Index:=0 ; 
dm.dataset1.Parameters.Items[0].Name:='parametro';
dm.dataset1.Parameters.Items[0].DataType:=fttipo de datos;
dm.dataset1.Parameters.Items[0].Direction:=pdinput;
dm.dataset1.Parameters.ParamByName('pr').Value:=componente;
dm.dataset1.Close;
dm.dataset1.CommandText:='select * from 10rhacci where campo =:pr' dm.dataset1.Open;
dm.dataset.Parameters.Clear;

[jachguate]

Empezado por Ing_Fajardo

que crees vistas, con eso reduces tu codigo y se hace mas rapido la consulta.

Definitivamente se reduce el código, pero ¿realmente se hace mas rápida la consulta?

A primera vista, no veo en que ayudaria a mejorar el rendimiento el uso de vistas. Es mas con ciertos motores como SQL Server (al menos el 7) el uso de vistas en ciertas sentencias con varios joins puede llegar a tener un coste considerable de rendimiento en contraparte con las consultas directas a las tablas.... es un hecho que he comprobado recientemente y que confirma mis antiguas teorias sobre sqlserver...

Hasta luego.