IsLeapYear

Modified on 16/01/2009 09:25 by CPABED Categorized as Plattform

IsLeapYear(Year: Word): Boolean
'''Syntax:'''{BR}
{{{{'''function''' IsLeapYear(Year: Word): Boolean;}}}}{BR}
{BR}
'''Beschreibung:'''{BR}
{BR}
Die Funktion gibt an, ob es sich bei einem bestimmten Jahr um ein Schaltjahr handelt.{BR}

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

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

'''Beispiel:'''{BR}
{BR}
<code pascal>
//Im folgenden wird eine Funktion definiert, die anzeigt, ob das laufende Jahr ein Schaltjahr ist.

function IsThisLeapYear: Boolean;

begin
  Result := IsLeapYear(YearOf(Date));
end;
</code>

CP Wiki

Navigation¶

IsLeapYear