Tema: Contar Dias
Ver Mensaje Individual
  #1  
Antiguo 27-06-2004
Paradiso Paradiso is offline
Miembro
 
Registrado: jun 2004
Posts: 68
Reputación: 20
Paradiso Va por buen camino
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.
Responder Con Cita