Como incrementar 1 mês numa data

IncMonth(Data, 1);
//a variável Data é do tipo TDateTime.

//obs: para decrementar basta usar assim:

IncMonth(Data, -1);