Delphi - Code Hilfe

[xZise]

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.