PDA

Ver la Versión Completa : Diferencia de fechas


noshy
31-05-2006, 17:56:47
Hola a todos, necesito saber la cantidad de dias entre dos fechas. Abra alguna funcion que me lo de o tendre que recurrir al famos codigo:


cont := 0;
while date1 < date2 do
begin
cont := cont + 1;
date1 := date1+ 1;
end;

ContraVeneno
31-05-2006, 18:05:19
Resta las dos fechas y del resultado que obtengas, la cantidad entera son los días y la cantidad decimal son las horas.

fidel
31-05-2006, 18:06:03
Hola:

Los días entre dos fechas se sacan restando la fecha mayor menos la fecha menor y el resultado son los días.

A partir de no se que versión de Delphi con DaysBetween, añadiendo DateUtils en el uses.

Un saludo.

noshy
31-05-2006, 18:19:24
Muchas Gracias, la solucion fue esta:


var
vcantdoas : Double;
begin
vcantdias := abs(Date1-date2);
end;