Como restar fechas

[User_Baja_2]

El caso que se me representa es el siguiente:

- Una Variable Hora (VbleHora) del tipo TTime
Le asigno el valor de un campo Hora

VbleHora= Tabla.FieldByName('CampoHora').asDateTime;
(uso DateTime pq no existe el asTtime)

repito la operación con una 2º variable y otro segundo campo Hora

VbleHora2=Tabla.FieldbyName('CampoHora2').asDateTime;

En una variable del tipo de datos TTime guardo la diferencia de la vblehora2 menos vblehora

Quedando:
VbleResultadoHora=VbleHora2-VbleHora

el resultado de esta variable lo guardo en un 3º campo del tipo Hora con el formato: "hh:nn:ss"

Si por ejemplo tengo estos datos:

VbleHora -> 12:00:33
VbleHora2-> 12:00:34
El restultado me da: VbleResultadoHora -> 00:00:00

Porque hay solamente 512 Milisegundos de diferencia

¿Cómo puedo visualizar correctamente el dato en el 3º campo?

Esperando que ahora pueda comprender mejor mi duda, les agradezco de antemano su ayuda

Gracias