Bueno, pero si lo que quieres es visualizarlo en alguna parte, puedes hacer uso de la siguiente función:
Código Delphi
[-]
function TiempoRestante(HoraHasta :TTime):String;
begin
Result := FormatDateTime('HH:MM:SSSS', Time - HoraHasta);
end;
Para probarla coloque un TDateTimePicker con su prpiedad Kind en dtkTime, un TEdit y un TTimer, al OnTimer le puse esto:
Código Delphi
[-]
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Edit1.Text := TiempoRestante(DateTimePicker1.Time);
end;
Espero te sirva de algo
.