Ajuda como somar anos a uma data
Caros amigos da Lista, Bom dia
Tenho um formulário e nele dois maskedit.
No primeiro preciso digitar uma data e dependendo do ítem selecionado no combobox, preciso que o outro maskEdit receba a data digitada no primeiro somando 3 anos.
Ex: MaskEdit 31/08/2004 --> Combobox ItemIndex = 1 --> maskEdit2 = 31/08/2007
Já tentei vávias formas e não consegui.
Alguém poderia me ajudar?
No Aguardo
Raphael
Tenho um formulário e nele dois maskedit.
No primeiro preciso digitar uma data e dependendo do ítem selecionado no combobox, preciso que o outro maskEdit receba a data digitada no primeiro somando 3 anos.
Ex: MaskEdit 31/08/2004 --> Combobox ItemIndex = 1 --> maskEdit2 = 31/08/2007
Já tentei vávias formas e não consegui.
Alguém poderia me ajudar?
No Aguardo
Raphael
Raphael
Curtidas 0
Respostas
Xtreme
31/08/2004
maskedit2.text:=datetostr(incmonth(strtodate(maskedit1.text),12*3));
GOSTEI 0
Knight
31/08/2004
Você pode utilizar a função IncYear, da unit dateutils:
function IncYear(const AValue: TDateTime; const ANumberOfYears: Integer = 1): TDateTime;
O código ficaria assim:
maskedit2.text:=datetostr(IncYear(strtodate(maskedit1.text),3));
Espero que isso resolva seu problema.
function IncYear(const AValue: TDateTime; const ANumberOfYears: Integer = 1): TDateTime;
O código ficaria assim:
maskedit2.text:=datetostr(IncYear(strtodate(maskedit1.text),3));
Espero que isso resolva seu problema.
GOSTEI 0