Error al trabajar con fechas

[eldiegofg]

Hola gente del foro, ante todo muchas gracias por su atencion ya que mi primer y unica pregunta hasta ahora se han molestado en contestarmela en forma rapida, clara y precisa, cosa que para usuarios nuevos como yo, son de gran valor y utilidad.

El motivo de esta nueva consulta es que al trabajar con tipos de datos de fecha (TDateTime) siempre me aparece el mismo resultado: "30/12/1899"
Estoy intentando hacer diferencias entre una fecha final y una fecha inicial para obtener el numero de dias transcurridos y probe dandole valores constantes a dos variables tipo TDateTime y como resultado obtengo la fecha antes mencionada. Alguna sugerencia?
Muchas gracias por su tiempo. Saludos