FTP | CCD | Buscar | Trucos | Trabajo | Foros |
#1
|
|||
|
|||
Contar Dias
Hola Amigos De CLub Delphi.
Les comento, en un soft que estoy desarrollando actualmente para una Pesquera, necesito guardar la cantidad de dias de un viaje Normal, para ello hago lo siguiente ( aclaracion: Delphi 7 + DbExpress+ Interbase): function CantidadDeDias(Fecha1:Tdate;Fecha2:Tdate):integer; {devuelva la cantidad de dias entre dos fechas} begin if DaysBetween(Fecha1,Fecha2) = 0 then result := 1 else result := DaysBetween(Fecha1,Fecha2); end; La Cuestion es que si yo ingreso, por medio de TxDBDateEdit, por ejemplo 01/06/04 como fecha Inicio y 10/06/04 como fecha final. En Teoria me tendria que devolver 10 dias, PERO ME DEVUELVE 9.!!! Ahora si ingreso cualquier otra fecha que no sea a partir del primero de mes, el calculo lo hace bien. Espero haber sido claro, y desde Muchisimas Gracias.!!!!!! Paradiso. |
#2
|
||||
|
||||
Acabo de hacer pruebas y el valor que me devuelve siempre es correcto:
Cita:
__________________
Guía de Estilo de los Foros Cita:
|
#3
|
||||
|
||||
Probablemente te interese mas la funcion DaySpan que te devuelve un Double con el dia y la porción de dia. Supongo que tu problema es la hora de los datetimes y por eso no te dá el dia completo.
Cita:
Saludos Última edición por Lepe fecha: 27-06-2004 a las 11:50:17. |
|
|
|