[droguerman]

se me ocurre

Código Delphi [-]
 var
   dd, mm, aa : Word;
 begin
    decodeDate(dateTimePicker1.date, aa, mm, dd);
    aa := aa+10;
    dateTimePicker1.date := encodeDate(aa, mm, dd);
 end;