Diferencia de fechas
 

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:

Código Delphi [-]
cont := 0;
while date1 < date2 do
     begin
          cont := cont + 1;
          date1 := date1+ 1;
     end;

Resta las dos fechas y del resultado que obtengas, la cantidad entera son los días y la cantidad decimal son las horas.

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.

Solucionado
 

Muchas Gracias, la solucion fue esta:

Código Delphi [-]
var
    vcantdoas : Double;
begin
    vcantdias := abs(Date1-date2);
end;