Ergebnis der Suchanfrage

• Forum: Sonstige Fragen zu Delphi

  Re: Werktage zählen

    Delphi
    by Jelly, 9. Jul 2006
  function CountWeekDays (Datum1, Datum2 : TDateTime) : integer ;
  var
  i : integer ;
  
  function IstWerkTag (Datum : TDateTime) : boolean ;
  begin
  Result := not (DayOfWeek (Datum) in ) ; // 1=Sonntag, 7=Samstag
  // Hier kannst Du eventuell noch auf Feiertag prüfen
  end ;