Hola, al final ya no necesito realizar esa funcion, pero supongo que debe ser algo así como esto, por si a alguien le interesa:
Código:
Function DiferenciaDias ( Desde : DateTime; Hasta : DateTime ) : Double;
Var
Resultado : TimeSpan;
Begin
Resultado := Hasta.Subtract ( Desde );
Result := Resultado.TotalDays;
End;
No la he probado.