somar apena o mes ???

amigos estou com uma duvida pois tinha parado com delphi a algum tempo e agora estou voltando e preciso de ajuda pois gostaria de uma função que somase apena o mes
EX


01/01/2001 ficaria 01/02/2001 nao é somar a data mais 30 dias nao pq assim daria erro gostaria de fazer a some somente do mes mesmo


agradeço