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. |
Acabo de hacer pruebas y el valor que me devuelve siempre es correcto:
Cita:
|
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 |
La franja horaria es GMT +2. Ahora son las 07:45:46. |
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