Kalenderwoche ???

[machstuhl]

sry fürs totengräbern, aber kann mir einer erklären warum +4 bzw +8 aufs datum gerechnet wird?

Delphi-Quellcode:

  DecodeDate(Datum + 4 - day,y,m,d);
  result := round(((Datum + 8 - day) - EncodeDate(y,1,1)) / 7);