Delphi - cadenas

hola a todos!
tengo que crear una aplicacion para calcular fecha probable de parto, que consiste en sumar 280 dias a partir de el primer dia de la ultima menstruacion.
he pensado en asignar una cadena a cada mes y despues sumar todos los meses cerrando las cadenas. y despues utilizar un puntero.
quisiera saber si estoy bien encaminado, o por ahi tienen alguna idea mejor, les agradezco, muchas gracias.

Lo estás complicando de más, por decir un ejemplo:

showmessage(DateToStr(now+280));

ahora, la funcion now te da la fecha actual de tu pc, y la puedes cambiar por cualquier fecha que desees

gracias por tu dato me andubo, pero no se como cambiar la fecha actual por otra, no me darias un ejemplo? muchas gracias.

Pues hay mas de una forma de hacerlo, por ejemplo:

En la pestaña win32 de los componentes hay uno que se llama DateTimePicker, el cual es un calendario, solo seleccionas la fecha y ejecutas la linea

showmessage(DateToStr(DateTimePicker1.Date+280));