Future<T> helper record

Src/Myc.TaskManager.pas

@@ -9,6 +9,13 @@ uses
 type
     IMycTaskManager = interface
         function CreateTask( const Gate: IMycState; const Proc: TProc ): TMycSubscription;
+
+        // Waits for the operation associated with State to complete.
+        // Must not be called from a worker thread of this factory.
+        // After waiting, or if the state is already set, any first stored exception
+        // from any worker thread of this factory will be re-raised in the calling (main) thread.
+        // Raises ETaskException if called from within a worker thread.
+        procedure WaitFor(State: IMycState);
     end;
 
 var