Delphi XE10 tarea se hace el hilo actual
Requerido por la función actualmente en ejecución
TThread.CurrentThread.ThreadID;