Ver Mensaje Individual
  #6  
Antiguo 03-06-2008
Avatar de enecumene
[enecumene] enecumene is offline
Miembro de Oro
 
Registrado: may 2006
Ubicación: Santo Domingo, Rep. Dom.
Posts: 3.040
Reputación: 21
enecumene Va por buen camino
Hola, hay algo que no entiendo, pones lo siguiente:

Código Delphi [-]
if JvDateTimePicker1.Date = JvDateTimePicker2.Date then
                MyQuery1.SQL.Add('servicios.f_ini = '+ QuotedStr(DateToStr(JvDateTimePicker1.Date)) +'')
             else begin
                MyQuery1.SQL.Add('(servicios.f_ini >='+ QuotedStr(DateToStr(JvDateTimePicker1.Date))  +') AND  (servicios.f_ini <='+ QuotedStr(DateToStr(JvDateTimePicker2.Date))  +')');
             end;

¿el campo servicios.f_ini es un campo Date o string?, por qué no intentas de esta manera?:

Código Delphi [-]
if JvDateTimePicker1.Date = JvDateTimePicker2.Date then
            begin
                MyQuery1.SQL.Add('servicios.f_ini = :fecha');
                MyQuery1.ParamByName('fecha').AsDate := JvDateTimePicker1.Date;
             end else begin
                MyQuery1.SQL.Add('servicios.f_ini >= :inicio AND servicios.f_ini <= :final');
                MyQuery1.ParamByName('inicio').AsDate := JvDateTimePicker1.Date;
                MyQuery1.ParamByName('final').AsDate := JvDateTimePicker2.Date;
             end;
   end;

Saludos.
__________________

Mi BLOG - ¡Joder, leanse la guia de estilo!
Las Palabras son enanas, los ejemplos gigantes.

Última edición por enecumene fecha: 03-06-2008 a las 02:32:11.
Responder Con Cita