Código Delphi [-] DBEdit1.Text := DateToStr(IncMonth(DateTimePicker1.Date));
DBEdit1.Text := DateToStr(IncMonth(DateTimePicker1.Date));