suponiendo que 6 meses son 180 días...
Código Delphi
[-]
Dtp1.Datetime := now;
dtp2.DateTime := now + 180;
Ahora.. cuantos días exactos tienen los próximos 6 meses... eso ya es otro calculo.
Para calcularlo, Podes intentar basarte en la función DaysInAMonth o DaysInMonth de la unidad DateUtils (solo en Delphi 7).
Saludos.
