Delphi Nächstes Datum errechnen

Thema durchsuchen

Ansicht

Themen-Optionen

Nächstes Datum errechnen

Ein Thema von Larsi · begonnen am 30. Dez 2008 · letzter Beitrag vom 2. Jan 2009

Vorheriger Beitrag

Nächster Beitrag

haentschman

Registriert seit: 24. Okt 2006
Ort: Seifhennersdorf / Sachsen
5.432 Beiträge

Delphi 12 Athens

#13

Re: Nächstes Datum errechnen

30. Dez 2008, 13:03

eigentlich schon. Da ich bei meinen Überlegungen auf dieses Problem gestoßen war.

minDate := IncYear(StartOfAYear(YearOf(date))); du initialisierst minDate mit 01.01.2009 00:00, wenn ich o.g. Funktion richtig interpretiere. (ausgegangen vom heutigen Datum)

wenn der erste höhere als heute gültige Eintrag (z.B. 02.05.2009) gefunden wird ist
if (aDate >= date) and (aDate < minDate) then ...False und minDate wird nicht aktualisiert.