Eingabe Ordnungszahl d. Monats Ausgabe: Anzahl d. Monatstage

[s-off]

Zitat von Delphi Hilfe:

DaysInAMonth (Funktion)

Die Funktion gibt die Anzahl der Tage im angegebenen Monat eines angegebenen Jahres zurück.

Unit
DateUtils

Kategorie
Datum/Zeit

Delphi-Syntax:
function DaysInAMonth(const AYear, AMonth: Word): Word;

Beschreibung
Mit DaysInAMonth können Sie die Anzahl der Tage eines Monats im angegebenen Jahr ermitteln.
AYear gibt ein Jahr zwischen 1 und 9999 (inklusive) an.
AMonth gibt einen Monat zwischen 1 und 12 (inklusive) an.

Und da diese Funktion neben dem Monat auch das Jahr erwartet, ist das Ergebnis genauer, als bei der Case-Alternative.
Warum? Weil Schaltjahre berücksichtigt werden, die Dein Lehrer anscheinend vergessen hat.

Also benötigst Du zwei Edits - eins für den Monat, und eins für das Jahr.

Den Rest bastelst Du jetzt bitte alleine.