Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Programmieren allgemein (https://www.delphipraxis.net/40-programmieren-allgemein/)
-   -   TParallel.For Break o.ä? (https://www.delphipraxis.net/191258-tparallel-break-o-ae.html)

a.def 26. Dez 2016 17:49

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

Daniel 26. Dez 2016 17:57

AW: TParallel.For Break o.ä?
 
http://www.delphipraxis.net/181982-t...abbrechen.html

a.def 26. Dez 2016 18:00

AW: TParallel.For Break o.ä?
 
Danke.

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

TBx 26. Dez 2016 19:03

AW: TParallel.For Break o.ä?
 
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 26. Dez 2016 19:07

AW: TParallel.For Break o.ä?
 
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 26. Dez 2016 20:47

AW: TParallel.For Break o.ä?
 
[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 26. Dez 2016 21:03

AW: TParallel.For Break o.ä?
 
Naja da muss man nicht viel haben :P

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 26. Dez 2016 21:10

AW: TParallel.For Break o.ä?
 
Zitat:

Zitat von a.def (Beitrag 1357244)
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 26. Dez 2016 21:38

AW: TParallel.For Break o.ä?
 
In welche Ecke darf ich mich stellen, um mich zu schämen? :pale:


Alle Zeitangaben in WEZ +1. Es ist jetzt 09:07 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz