Thema: Delphi Wochenendtage bestimmen

Einzelnen Beitrag anzeigen

Benutzerbild von negaH
negaH

Registriert seit: 25. Jun 2003
Ort: Thüringen
2.950 Beiträge
 
#4

Re: Wochenendtage bestimmen

  Alt 16. Okt 2003, 20:33
Also mit DayOfWeek() wird der Tag das Startdatums berechnet. Nun kannst du das Startdatum sehr einfach um die Anzahl Tage erhöhen so das das Datum ein Montag ist. D.h. das Startdatum liegt nun auf einem Wochenanfang. Nun subtrahierst du dieses Startdatum vom Endedatum um die Anzahl der Tage zu bekommen. Diese Anzahl div 7 sind die vollen Wochen, und Anzahl mod 7 die Tage in der Restwoche.
Aus all diesen Fakten lässt sich direkt die Anzahl der Wochentage und Wochendtage errechnen.

Eine Schleife ist also überhaupt nicht nötig und würde im Falle 1.1.1 bis 31.12.2000 auch ziemlich lange benötigen.

Gruß Hagen
  Mit Zitat antworten Zitat