Manipulation des dates

Bonsoir tous le monde,

je voudrai savoir comment faire pour obtenir une date,et ce en ajoutant un entier a une date donnee (ie: date initial+number=date final ex: 20/03/2007 +28= 28/03/2007).

Merci.

Code:

---

Resultat := EncodeDate( 2007, 03, 20 ) + 28;

---

Resultat va contenir 28.03.2007. Au besoin, utilise les routines de conversion DateToStr et StrToDate.

PS: EncodeDate c'est juste pour l'exemple

euh, le résultat ne serait pas ... 17/04/2007 :mouarf:

Bien vu ! Je retourne apprendre mes tables d'addition moi.

Pq chercher midi a quatorze heure ? :oops:

Tu as ta variable de type tdatetime. Tu lui ajoutes tout simplement la valeur que tu veux et le tour est joué :

Code:

---

1 2 3 4 5 6 7 8

var myDate : TDatetime; begin showmessage(datetostr(myDate)); //exemple myDate vaut 20/03/2007 myDate := myDate + 28; showmessage(datetostr(myDate)); //affiche 17/04/2007 :D end;

---

C'est ce que je voulais dire ... en plus clair.

si tu fais:

Code:

---

1 2 3 4 5 6

var date1, date2: TDateTime; begin date1 := date+1; date2 := date+0.5;

---

date1 vaut le lendemain de date et date2 vaut date + 12 heures..
en gros 1 (l'unite de TDateTime) = 1 jour
0.1 = 1/10 de jour = 0.1*24 = 2.4 heures etc...

:salut:
voir aussi du côté des fonctions IncDay, IncMonth, IncYear, ...

Bonjour,

Une date/Time est un nombre flottant

1 jour = 1
1 heure = 1/24
1 minute = 1/24/60
1 seconde = 1/24/60/60
1 miliseconde = 1/24/60/60/1000
Rien de plus bas

Comme les TDateTime sont des flottant, vous pouvez faire des addition et/ou soustraction sans aucun problème.

Autrement, comme d'autre vous l'on indiqué, il existe des fonction spécialiser de manipulation de date. C'est surtout important si vous manipuler les mois.(28,29,30 ou 31 jours maxi)