Zitat von
ConTaCt:
ich hab sonst nur 4 Jahre VB programmiert!^^
OOPs... Entschuldige, dass ich es ggf. ziemlich "Neuling"-artig geschrieben habe
Aber ich hoffe, du hast den Zweck verstanden
Du kannst ja zwei Funktionen deklarieren:
Delphi-Quellcode:
function IsLeapYear(AYear : Integer) : Boolean;
function EasterSunday(AYear : Integer) : Integer
In den beiden Funktionen machst du je eine Aufgabe
Ist dann ein bisschen getrennter, und kommt nicht durcheinander.
Nun zum "EasterSunnday": Diese Funktion gibt dir "d + e" wieder (da ist es egal, ob März oder April).
Dann kannst du in der "Berechnen"-Methode daraus errechnen, ob es April oder März ist.
Es ist der März, wenn der Rückgabewert + 22 nicht größer als 31 ist. Ansonsten ist es der April! Kleiner Tipp: Speichere den Rückgabewert in einer Variable.