Sumar Fechas

[__cadetill]

var
  MiDia: Tdate;
begin
  MiDia := Date + 20;
end;

Algo así?

PD: para no controlar los festivos... ya tendrías que currartelo algo más y eso ya te lo dejo para ti