TParallel abbrechen

[Stevie]

Mit der Überladung, die beim AIteratorEvent die version mit dem TLoopState übergeben bekommt, kannst du die Schleife abbrechen.
Solltest aber trotzdem innerhalb des Events den übergebenen LoopState überprüfen, denn das Ding läuft auch nach dem abbrechen noch ein bisschen nach.

Also so in etwa:

Delphi-Quellcode:

TParallel.For(1, 100,
  procedure(i: Integer; ls: TParallel.TLoopState)
  begin
    if not ls.Stopped then
    begin
      MachWas;
      if SollAnhalten then
        ls.Stop;
    end;
  end);

Die Möglichkeit, nen CancellationToken zu übergeben wie in .Net wäre sicherlich die schönere Lösung gewesen, aber nunja

Zitat von Dejan Vu:

Dessenungeachtet kann man eine normale For/Foreach-Schleife auch nicht abbrechen.

Häh? Schonmal was von Break gehört?

Ganz naives Beispiel: mit dem TParallel irgendwas in Dateien suchen und die Dateiliste hab ich schon (bitte keine Diskussion, ob man das anders lösen könnte). Und es gibt in der UI einen Abbrechen Knopf. Tjo, nun sollte man wohl das Dingen abbrechen können oder?