Somme date et nombre de jours en delphi

Bonjour,

Comment faire en delphi pour trouver le date (Date2) en calculant la somme d'une date (Date1) plus un nombre de jours (NbreJrs)
Exemple :
Date1 = DateTimePicker1 soit 01/01/2011
NbreJrs = 180
Date2= 01/06/2011
Date2 = Edit1.Text
Merci

1 réponse

  1. Salam abdelkader;

    je vais te guidé par un petit exemple

    1 - crée un nouveau projet;

    2 - met sur ta form ( botton, datetimepicker, edit )

    3 - double click sur le boutton; met le code suivant :
    edit1.Text:=DateToStr(DateTimePicker1.Date+180);

    4 - exécute ton projet met la date que tu veut et click sur le boutton

    NOTE : delphi travail avec la date system donc il respect le nombre de jour du mois ( 30 31 ou 28 pour février )
    donc : 01/01/2011 + 180 ne donne pas 01/06/2011 ^_^

    Bonne continuation
    0