FormatDateTime

[dannymunuera]

Usa un timer, componente de delphi, el valor que sale por defecto es de 1000 que es en milisegundos, que te quiero decir que cada segundo tiene los 1000 mlseg y que cada minuto tiene 60 seg por lo tanto multiplica 1000 * 60 * 15 que son los minutos y se ejecuta cada ese tiempo un evento ontimer, si no lo siguiente al timer le pones el valor que desees luego creas una variable global por ej. HoraCero y la inicializas en alguna parte que desees ej. HoraCero :=Time; fijate que time es una funcion de delphi para la hora, luego en el evento ontimer.
Var
tempInt : extended;
begin
tempInt := HoraCero - Time;
end;

Trabaja con la diferencia y soluciona tu problema