[BDWONG]

Hola compañero puedes probar con la función DaysBetween que nos regresa la cantidad de dias entre dos fechas
te dejo un ejemplo:

Código Delphi [-]
uses
  SysUtils,dateutils;

var
fechaInicial,fechaFinal:TDateTime;
diasEntreFechas:Integer;
begin

   TryStrToDate('01/01/2016',fechaInicial);
   TryStrToDate('10/01/2016',fechaFinal);
   diasEntreFechas:=DaysBetween(fechaInicial,fechaFinal);

   if diasEntreFechas<=10 then
     Writeln('Esta en el rango de 10 dias, son: ',diasEntreFechas,' dias ')
   else
      Writeln('No esta en el rango de 10 dias, son: ',diasEntreFechas,' dias ');

   readln;
end.

Si no es lo que buscas comentalo para poder ayudarte.
Saludos....