trouver une date à partir d'un nombre de jours

bonjour,

j'ai un petit problème : en fait j'ai une boucle while qui me donne en gros :

Code:

---

1 2 3 4 5 6 7

while conso_totale>stock limite do begin conso_totale-conso_journaliere; i:=i+1 (ou alors date_derniere_livraison+1); end; date_derniere_livraison+i end;

---

en fait j'ai une consomation totale, une consommation journaliere, une date de livraison, et un stock limite, et à partir de cela je dois trouver la date de prochaine livraison, c'est pourquoi je fais ce while, mais le probleme c'est que si je prend la solution avec i, i me donnera un nombre de jours, et comment je peux faire pour trouver une date avec un nombre de jours?

Salut

Si tu as une date initiale, tu peux faire servir la fonction IncDay declaree dans l'unité DateUtils

A+

Tu peux affecter des variables là dedans STP ?

Code:

---

1 2 3 4 5 6 7

while conso_totale>stock limite do begin conso_totale-conso_journaliere; i:=i+1 (ou alors date_derniere_livraison+1); end; date_derniere_livraison+i end;

---

Citation:

---

Envoyé par charlene44

trouver une date avec un nombre de jours?

---

C'est à dire ?
Date_Cherchee:=Date_de_Depart+Nombre_de_Jours ?
Parce que là, on a rien compris... ce serais bien d'être un peu plus clair dans tes explications

Pour t'aider :
Si tu regardes de plus près le type TDateTime,
- la partie entière représente le nombre de jours qui se sont écoulés depuis le 30/12/1899
- la partie fractionnaire, représente la fraction de jour qui s'est écoulée depuis minuit, bref les heures/minutes/seconde dans le jour.
A minuit, la partie fractionnaire sera égale à 0
A midi ---> 0,5
etc...

Du coup si
DateCherchee et Date_de_Depart sont des TDateTime et Nombre_de_Jours un entier, paf :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

conso_journaliere, conso_totale, stock limite,i -->integer ... var date_derniere_livraison, Date_Cherchee : TDateTime ... while conso_totale>stock limite do begin conso_totale:=conso_totale-conso_journaliere[i]; i:=i+1; end; Date_Cherchee:=date_derniere_livraison+i; end;

---

Je ne vois pas ou est le problême...:roll:

Citation:

---

Envoyé par waskol

Date_Cherchee:=Date_de_Depart+Nombre_de_Jours ?
Parce que là, on a rien compris... ce serais bien d'être un peu plus clair dans tes explications

---

voila c'est exactement ca, et on peut le faire comme ca en ajoutant un integer à un TdateTime? je croyais que ca aurai été plus subtil que ca...qu'est-ce que j'ai fait comme connrie moi encore......

Citation:

---

Envoyé par charlene44

voila c'est exactement ca, et on peut le faire comme ca en ajoutant un integer à un TdateTime? je croyais que ca aurai été plus subtil que ca...qu'est-ce que j'ai fait comme connrie moi encore......

---

:mouarf3: