Validação mensal de um aplicativo em Delphi

Dê uma estudada na unit DateUTils. Lá vai te proporcionar grandes ideias com as funções e procedimentos que ela tem. Ao ver seu tópico gostei da ideia e fui atraz estudar uma maneira de fazer isso. A principio pensei... Se a Função MonthOf retorna o mes... pensei em usala adicionando +1. Assim teria o próximo mês. Mas ele retorna um Word. daria trabalho ter que ficar posicionando texto "StrToDate(dia+'/'+InttoStr(MonthOf(Data)+1)+'/'+Ano);".   Porém é o único jeito que achei de achar a data com o mes alterado. Alias, Função MonthOf pertence a Unit DateUtils   Aí meu amigo, pra sua utilidade, se vc tiver gravado a data que vc quer verificar se ja passou 1 mes... utilize este metodo e verifique se a data gerada é igual a data atual.   Espero que ajude. Caso contrário, volte a postar. Att, pjrm1470.

Legal... Vlw pelas dicas...ainda aceitando sugestões!