[Prism] Interner Fehler bei for parallel - Schleife

[Elvis]

Zitat von BloodySmartie:

Hier hab ich ganz offensichtlich mal wieder Nachholbedarf

Hmm, ohne "j" kompiliert das tatsächlich. Aber jetzt steh' ich erst recht aufm Schlauch. Kannst Du mir ein dreizeiliges Beispiel klappern, damit ich kapiere, wie ich Daten in die Schleife geben und Ergebnisse rausbekommen kann? (Oder kannst Du mir das wenigstens erklären?)

Eine Möglichkeit wäre es, den Wert in eine Referenz zu verpacken. Damit hat man was, das gesperrt werden kann:

Delphi-Quellcode:

var j := new class(Value := 0); 
for parallel i : Integer := 0 to 10000 do 
begin 
  locking j do
    j.Value := j.Value + 1; 
end;

Ich habe hier eine anonyme Klasse verwendet, das reduziert ein unnötiges Deklarieren einer Klasse nur dafür...
Natürlich ist der Code komplett irrsinnig. Schließlich sorgt das "locking" dafür, dass imer nur ein Thread auf einmal die Zahl inkrementiert...