Problema con calculos de hora

[[enecumene]]

Vale, Aquí más información:

ZConfigHORA1 = La hora límite de llegada, por defecto está como 8:15:59 AM.
TiempoDespues = viene siendo media hora despúes del registro, despúes de media se realiza la salida.
Ahora = viene siendo el tiempo en el momento.

Ahora bien, la hora de llega oficial es a las 8:00:00 AM y el límite es a las 8:15:59 (ZConfigHORA1) si el usuario llega en ese rango no se marca tardanza pero despúes de ahi si se marca la tardanza, ejemplo:

juan perez llego marco a la 8:05:27 AM tardanza: 0
Fernando Leonor llego marco a las 8:16:31 AM tardanza: 1

de ahi el codigo:

Código Delphi [-]
if Ahora > ZCondigHora1.asTime then...

Si Ahora es mayor que la hora limite pues se marca tardanza si no, No se marca.

Espero haberme explicado mejor, .

Saludos.