como sumar Dias a una fecha

[esimon]

gracias Delphius, nuevamente.

como dije anteriormente uso delphi 7 y accesse 2003, para insertar uso este codigo

 
procedure TFrm_Agencia.SpeedButton6Click(Sender: TObject);
begin
       Tbl_Agencias.Insert;
              
end;

y para grabar este.

 
procedure TFrm_Agencia.SpeedButton5Click(Sender: TObject);
begin
       if Tbl_Agencias.State in [dsEdit, dsInsert] then
          Tbl_AgenciasNumero_Provincia.Value := Tbl_ProvinciaNumero_Provincia.Value;
          Tbl_AgenciasNumero_Localidad.Value := Tbl_LocalidadNumero_Localidad.Value;
        //  DateTimePicker1.Date := Tbl_AgenciasFecha_Pendiente_Inspeccion.Value;
          Tbl_AgenciasFecha_Pendiente_Inspeccion.Value := DateTimePicker1.Date;
          Tbl_Agencias.Post;
end;