IsLeapYear

IsLeapYear(Year: Word): Boolean Syntax:

function IsLeapYear(Year: Word): Boolean;

Beschreibung:

Die Funktion gibt an, ob es sich bei einem bestimmten Jahr um ein Schaltjahr handelt.

Mit IsLeapYear können Sie feststellen, ob das im Parameter Year angegebene Jahr ein Schaltjahr ist.
Year gibt das Kalenderjahr an.

Mit YearOf können Sie den Wert für den Parameter Year aus einem TDateTime-Wert ermitteln.

Beispiel:


//Im folgenden wird eine Funktion definiert, die anzeigt, ob das laufende Jahr ein Schaltjahr ist.

function IsThisLeapYear: Boolean;

begin
  Result := IsLeapYear(YearOf(Date));
end;