Réponse acceptée !
il me semble qu'il y a des fonctions dans DateUtils qui permette de regler le jour de depart de la semaine ...
qu'elle idée aussi de commencer une semaine un samedi ou un dimanche ...
sinon tu as la possibilité de calculer a partir du jour de l'année.
YourDayAs = DayOf(Date)
StartOfYear = jour de depart de l'année
si StartOfYear <> samedi :
FirstSaturday (night fever) = StartOfYear++ tant que FirstSaturday <> Samedi
sinon
FirstSaturday = StartOfYear
Sub = DayOf(FirstSaturday) { debut semain 1 }
WeekOfDay = (YourDayAs - FirstSaturday) div 7