Der Vorschlag von Detlef unter #7 in der ausführlichen Schreibweise ist selbsterklärend und "idiotensicher", während man bei IfThen
die Reihenfolge der Parameter leicht vertauschen kann, ohne den Fehler zu merken.
Oder wenn man bei der ursprünglichen Lösung bleiben möchte:
Delphi-Quellcode:
if IsLeapYear(Year) then
Days := 29
else
Days := 28;
Kann man auch so idiotensicher verhauen:
Delphi-Quellcode:
if IsLeapYear(Year) then
Days := 28
else
Days := 29;