Berechnung von Anfang der Monats / Ende des Monats

[GroHae]

Ich bin mir nicht sicher ob ich dich verstanden habe, aber:

Datum kannst du mit :

Delphi-Quellcode:

var Year, Month, Day: word;
begin
  DecodeDate(Date, Year, Month, Day);
  .....
end;

zerlegen


Letzte Tage des Monats etwa so:
  result := IncMonth(StrToDate('01.' + IntToStr(iMonat) + '.' + IntToStr(iJahr)),1) - 1; Erste Tag mit

Delphi-Quellcode:

  result := EncodeDate(Year, Month, Day);
Day = 01