Forum: Object-Pascal / Delphi-Language
by Hobby-Programmierer,
13. Aug 2012
... und if / then brauchst du auch nimmer :roll: ROFL
schaltjahrkorrektur:= ((Month in ) and IsLeapYear(Year));
Forum: Object-Pascal / Delphi-Language
by Hobby-Programmierer,
12. Aug 2012
Auch wenn ich deinen Code immer sehr schätze, muss ich zugeben das mich als Amateur deine Hilfsconstanten eher verwirren.
Aber das des funktioniert war eher darauf fokussiert
Schönen Abend noch ;)
Forum: Object-Pascal / Delphi-Language
by Hobby-Programmierer,
12. Aug 2012
Hmm, sollte Result:= ((Month in ) and IsLeapYear(Year)) nicht ausreichen?
Edit: also mein Delphi führt folgendes korrekt aus
function schaltjahrkorrektur(Month, Year: Integer): Boolean;
begin
Result:= ((Month in ) and IsLeapYear(Year));
end;