[gsilvei]

ambos campos son de una base de datos.

Código Delphi [-]
procedure TFormPropostaApolice.INICIALExit(Sender: TObject);
var Data : tdatetime;
begin
  Data := INICIAL.Value;
  Data := IncMonth(Data,12);
  FINAL.Value:= Data;
end;