[D7] trouver une semaine partir d'une date

Bonjour à tous,

je recherche un utilitaire pour trouver la semaine de l'année correspondant à une date.

Si vous avez qq news, ca serait sympas

bye

anthony

Code:

---

1 2 3 4 5 6 7 8 9

uses DateUtils;   (...)   procedure TForm1.Button1Click(Sender: TObject); begin NumSemaine := WeekOf(Date); end;

---

Citation:

---

Envoyé par Aide Delphi

Renvoie la semaine de l'année représentée par une valeur TDateTime.

---

merci,

j'avais trouvé aussi:

Citation:

---

var
DateTime : TDateTime;
GetWeek : Word;
begin
DateTime := EncodeDate(Year,Month,Day);
GetWeek := WeekOfTheYear(DateTime);
end;

---

[/code]

Exact.

Ce que tu avais trouvé est tout aussi valable:

Citation:

---

Envoyé par Aide Delphi sur WeekOf

Remarque : WeekOf renvoie la même valeur que la fonction WeekOfTheYear.

---

Citation:

---

Envoyé par Aide Delphi sur WeekOfTheYear

Remarque : WeekOfTheYear renvoie la même valeur que la fonction WeekOf.

---