Delphi - sumar fechas y horas

por favor como hago para sumar a una determinada fecha u hora otra. por ejemplo
fecha.text:=datetostr(date+5) -1/1/2002 ...... 6/1/2002
hora.text:=timetostr(time+5) 14:00 ....... 19:00

tanto las fechas comolas hoas se guardan en variables de tipo 'double'. osea que son numeros reales con doble precision.

si tengo dos fechas:

fecha1, fecha2: TDate; // en el fondo TDate es lo mismo que double

y las quiero sumar solo tengo que hacer esto:

fecha1 + fecha2

si el resultado lo quiero mostrar en un label,

label1.text:=dateToStr(fecha1+fecha2);

y ya esta.

con las horas es igual.

joya, pero como hago para sumar un valor determinado, es decir 5 dias a partir de hoy o 5 segundos a partir de ahora

Usa las funciones declaradas en la unidad DateUtils: IncSecond e IncDay