Ich habe in einem TForm so was:

markieren

Code:

Task : ITask;
....
Task:=TTask.Run();

Beim Schließen des Formulars möchte ich prüfen, ob der Task läuft, um ihn abzubrechen:

markieren

Code:

if Task.Status = TTaskStatus.Running then
  Task.Cancel;

1) Das geht aber nur, wenn der Task läuft, wenn er gar nicht gestartet wurde, kann ich nicht auf Task.Status zugreifen. Wie kann ich prüfen, ob es den Task gibt?
2) Das Beenden des Tasks dauert uU ein bisschen - wie kann ich warten, bis der Task beendet ist?

Danke für Erleuchtung!

Was heißt "nicht auf Status zugreifen können"? Wenn er noch nicht gestartet wurde ist er entweder TTaskStatus.Created oder TTaskStatus.WaitingToRun .

"Warten bis der Task beendet ist" entspricht WaitFor(..) :

zusammenfalten · markieren

Delphi-Quellcode:

const
   runningStates = [TTaskStatus.Running, TTaskStatus.WaitingForChildren];
begin
   if Assigned(asyncRefreshTask) then
      begin
         asyncRefreshTask.Cancel();
         try
            if (asyncRefreshTask.Status in runningStates) then
               asyncRefreshTask.Wait(delayTimeMs);
         except
            // make a smug face
         end;
         asyncRefreshTask := nil;
      end;
end;

Oder mit TEvent als Koordinator ...
http://docwiki.embarcadero.com/RADSt...o_Be_Completed

Zitat von Der schöne Günther:

Was heißt "nicht auf Status zugreifen können"? Wenn er noch nicht gestartet wurde ist er entweder TTaskStatus.Created oder TTaskStatus.WaitingToRun .

"Warten bis der Task beendet ist" entspricht WaitFor(..) :

zusammenfalten · markieren

Delphi-Quellcode:

const
   runningStates = [TTaskStatus.Running, TTaskStatus.WaitingForChildren];
begin
   if Assigned(asyncRefreshTask) then
      begin
         asyncRefreshTask.Cancel();
         try
            if (asyncRefreshTask.Status in runningStates) then
               asyncRefreshTask.Wait(delayTimeMs);
         except
            // make a smug face
         end;
         asyncRefreshTask := nil;
      end;
end;

Prüfen mit Assigned ist natürlich eine Lösung, da hast recht.
Wait nach Cancel liefert: EOperationCancelled with message 'Vorgang abgebrochen'. Wait wartet nur auf nicht abgebrochene Tasks. Dein
Try/Except schluckt diese Exception.
Und: Sobald Cancel aufgerufen wird, ist der Status des Tasks Canceled.