aquí tienes el código ejemplo:
Código Delphi
[-]
NuevaFecha :=IncDay(FechaActual,15);
Por si acaso IncDay pertenece a la unidad DateUtils, por lo tanto: DateUtils debe estar declarado en tu sección uses. Tambien podrias colocar valores negativos para restas días a una fecha:
Código Delphi
[-]
AnterioFecha :=IncDay(FechaActual,-15);