Ver Mensaje Individual
  #1  
Antiguo 20-04-2009
Kenobi Kenobi is offline
Miembro
 
Registrado: mar 2007
Posts: 191
Reputación: 18
Kenobi Va por buen camino
Problema con fechas Tdate

Tenngo un aplicacion en la cual utilizo sql para consultar rangos de pedidos entre fechas, ahora bien para esto generalmente uso tmsdatePicker el cual me devuelve la fecha seleccionada en su propiedad date...

Bien aparte de eso dentro de la misma aplicacion manejo un array de Tdate llamado arregloDias en el cual dada una fecha cualquiera guardo las fechas de toda la semana cosa de poder manejar esos valores facilmente,

tengo un procedimiento que llama a una consulta con paramentros (los cuales paso como parametros) ...algo asi

Código Delphi [-]
procedure consultar(Inicio,Fin:Tdate);
Begin
    Consulta.Close;
    consulta.Params.ParamValues['ValDesde']:=Desde;
    consulta.Params.ParamValues['ValHasta']:=Hasta;
    consulta.Open;
End;

ahora bien todo funciona cuando paso los valores de los paramentros desde un timepicker no asi cuando los paso como los elementos del arreglo ejemplo

Código Delphi [-]
//llamada a procedimiento 
Consultar_SolicitudAreas(DatePicker1.Date,DatePicker2.Date);

no funciona si lo llamo asi ....

Código Delphi [-]
Consulta(ArregloDias[1],ArregloDias[7]);

algo curioso solo funciona si en la declaracion del procedure los paramentros son del tipo variant , asi mismo en la declaracion del arrayDias

Código Delphi [-]
procedure consultar(Inicio,Fin:Variant);
ArrayDias =Array[1..7] of Variant;

la verdad asi ya funciona pero no me convence porque no se bien que es lo que pasa ....

me gustaria que alguien me lo aclare antes de continuar arrastrando un error que despues me cueste caro ...

Gracias ...
Responder Con Cita