Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.184 Beiträge
Delphi 12 Athens
|
Re: Anzahl der Wochen eines Monats ermitteln
29. Apr 2009, 15:22
Du schaust mit DayOfWeek nach welcher Tag auf den 1. fällt
dann kannst du ausrechnen wie lange die erste Woche noch geht.
nun läßt sich ausrechnen wann der 1. Wochenbeginn innerhalb dieses Monat wäre.
DayOfMonth gibt's doch auch nocht? ... also bis wann geht der Monat > DatumDesMonatsendes
und nun
1{für die 1. Teilwoche} + Aufrunden((DatumDesMonatsendes - DatumDesWochenbeginns + 1 {=Resttage}) / 7) = WochenInDiesemMonat
$2B or not $2B
|