Zeitraum nach Datum eingrenzen

[Haraldo]

Vielen Dank für die schnelle Antwort. ich habe mich umständlich ausgedrückt. IncMonth hilft schon erheblich ist aber noch nicht mein hauptproblem. ich versuche es nochmal zu umschreiben.

if incMonth(Datum1,3) < Datum2 then
begin
Abrechnungssatz1Begin := Datum2
Abrechnungssatz1Ende := incMonth(Datum1,3);
end;

if (incMonth(Datum1,3) > Datum2) and (IncMonth(Datum1,6) < Datum2) then
begin
Abrechnungssatz2Begin := Abrechnungsdatensatz1Ende
Abrechnungssatz2Ende := incMonth(Datum1,6);
end;

if (incMonth(Datum1,6) > Datum2) then (incMonth(Datum1,12) < Datum2)
begin
Abrechnungssatz3Begin := Abrechnungsdatensatz2Ende
Abrechnungssatz3Ende := incMonth(Datum1,6);
end;

if incMonth(Datum1,12) < Datum2 then
begin
Abrechnungssatz4Begin := Abrechnungsdatensatz3Ende
Abrechnungssatz5Ende := incMonth(Datum1,12);
end;

so gut so schlecht, bei meinem Beispiel benötige ich 4 Abrechnungssätze wie beschrieben,
wenn aber Datum1 = 18.5.2004 ist dann sind es nur zwei Abrechnungssätze

Abrechnungssatz 1 = vom 1.1.2005 bis 18.5.2005 = 10 € pro Monat = 54 €
Abrechnungssatz 2 = vom 19.5.2005 bis 31.12.2005 = 5 € pro Monat = ca. 32 €

wenn aber Datum1 = 18.5.2003 ist dann ist es nur 1 Abrechnungssatz
Abrechnungssatz 1 = vom 1.1.2005 bis 31.12.2005 = 5 € pro Monat = 60 €

vielleicht wird jetzt mein problem deutlicher.
Monthbetween ist zwar eleganter aber löst mein problem auch noch nicht