DecMonth Funktion gesucht

[DevidEspenschied]

Hi,

die Unit SysUtils.pas enthält ja die Funktion IncMonth, mit der eine TDateTime-Variable um einen Monat erhöht werden kann. Dabei wird auch das Jahr angepasst, falls der in der Variable gespeicherte Monat der Dezember ist. Das gleiche suche ich nun, um eine TDateTime-Variable um einen Monat zu verringern. Leider liefert weder die Hilfe, noch die Units SysUtils und DateUtils was passendes.

Kennt jemand eine Implementation dieser Funktion?

Danke für die Hilfe.

[mkinzler]

Einfach IncMonth() mit negativen Wert aufrufen

[himitsu]

Jupp.

IncMonth

Zitat:

IncMonth returns the value of the Date parameter, incremented by NumberOfMonths months. NumberOfMonths can be negative, to return a date N months previous.

IncMonth liefert den Wert des Parameters Date zurück, der um die Anzahl der in NumberOfMonths angegebenen Monate erhöht wurde. Wird mit NumberOfMonths ein negativer Wert übergeben, gibt die Prozedur ein entsprechend früheres Datum zurück.

[DevidEspenschied]

Okay danke, das hatte ich wohl überlesen.