TParallel.For Break o.ä?

[a.def]

Ich werde noch wahnsinnig.
Gibt es kein Break oder Continue in einer TParallel-For-Schleife?
Ich suche und suche aber finde nichts.

[Daniel]

http://www.delphipraxis.net/181982-t...abbrechen.html

[a.def]

Danke.

Interessant, dass es zwar Break (über einen kleinen Umweg) gibt, aber kein Continue.
Vielleicht kommt das ja noch in Zukunft.

[TBx]

Ein Continue ist hier überflüssig. In der normalen Schleife dient Continue dazu, den aktuellen Schleifendurchlauf abzubrechen. Dannach wird automatisch mit dem nächsten Schleifendurchlauf begonnen.
Bei TParallel.For ist es durchaus möglich ja sogar wahrscheinlich, dass der nächste Schleifendurchlauf bereits abgearbeitet wird. Es bleibt also nur noch, den aktuellen Durchlauf abzubrechen. Da der Schleifeninhalt hier in einer Ereignisprozedur abgearbeitet wird, muss diese nur noch beendet werden.

[a.def]

Zitat:

Bei TParallel.For ist es durchaus möglich ja sogar wahrscheinlich, dass der nächste Schleifendurchlauf bereits abgearbeitet wird

Angenommen ich habe eine Liste "0 bis 9".

Diese gehe ich nun sequenziell mit einer for-Schleife durch und schreibe "i" in eine ListBox. Da weiß man genau was passiert.
Mache ich das mit TParallel.For so scheint es irgendwo zu hängen und ein schier unendlicher Prozess wird gestartet.

Ich glaube ich scheine das Prinzip hinter TParallel.For noch nicht ganz verstanden zu haben.

Ich dachte "0 bis 9" wird aufgeteilt in verschiedene Threads, die dann parallel abgearbeitet werden.

[Uwe Raabe]

[QUOTE=a.def;1357239]

Zitat:

Ich dachte "0 bis 9" wird aufgeteilt in verschiedene Threads, die dann parallel abgearbeitet werden.

http://www.delphipraxis.net/1357229-post4.html

[a.def]

Naja da muss man nicht viel haben

Delphi-Quellcode:

// geht bei mir gnadenlos in die Hose... (ListBox füllt sich nicht und Programm scheint in einer Endlodschleife zu hängen)
ListBox1.Items.Clear;

TParallel.For(0, 9,
 procedure(i_: Integer)
  begin
   ListBox1.Items.Add(IntToStr(i_));
  end);

// funktioniert selbstverständlich und ohne Probleme
for i_ := 0 to 9 do
 begin
  ListBox1.Items.Add(IntToStr(i_));
 end;

[Uwe Raabe]

Zitat von a.def:

Delphi-Quellcode:

// geht bei mir gnadenlos in die Hose... (ListBox füllt sich nicht und Programm scheint in einer Endlodschleife zu hängen)
ListBox1.Items.Clear;

TParallel.For(0, 9,
 procedure(i_: Integer)
  begin
   ListBox1.Items.Add(IntToStr(i_));
  end);

Natürlich geht das in die Hose! Ein klassisches Beispiel dafür, daß es so wichtig ist, den tatsächlichen Code zu sehen.

Dir ist doch klar, daß das in einem separaten Thread abläuft, davon mehrere gleichzeitig laufen (zumindest mit halbwegs aktuellen Prozessoren) und die VCL nicht threadsicher ist? Zugriffe auf VCL-Objekte aus einem Thread (außer dem Hauptthread) sind mit Synchronize oder Queue zu synchronisieren. Dummerweise macht das in deinem Beispiel die gesamten Vorteile der Parallelverarbeitung zunichte.

[a.def]

In welche Ecke darf ich mich stellen, um mich zu schämen?