Von mehreren Threads auf dieselbe globale Variable zugreifen?

[a.def]

Wie greift man korrekt aus mehreren Threads auf eine globale Variable zu, wenn diese sogar noch verändert werden darf?
Aktuell prüfe ich bei jedem Schleifendurchgang, ob der Thread der die variable ändern möchte, der letzte Thread in meiner Liste ist. Das verlangsamt meinen Prozess aber etwas.
Mein Programm erzeugt bei einer bestimmten Aktion mehrere Threads die dieselbe Arbeit tun.
Aber ich habe eine einzige globale Variable, auf die zugegriffen und welche verändert werden muss.

Entschuldigung wenn ich mich irre, aber kann man hierfür Queue verwenden?

Delphi-Quellcode:

Queue(
 procedure
  begin
   // globale Variable verändern
  end
);

[Uwe Raabe]

Das kommt ganz auf die Art der Änderung an. Addieren, Subtrahieren sollte über TInterlocked geschehen. Bei einfachen Zuweisungen kann man aber nicht vorhersagen, welcher Thread der letzte ist und somit den endgültigen Wert bestimmt. Da hilft auch das Queue nicht. Das sorgt zwar für ein sicheres Schreiben, aber erzwingt nicht eine bestimmte Reihenfolge.

[p80286]

Welchen Typ hat die Variable?
bei einfachen Typen (integer,etc.) sollte es kein Problem geben. Bei records und anderen Strukturen wäre es ganz gut wenn Du ein Flag setzen würdest.
zb.

Delphi-Quellcode:

function readmyvalue:mytype;
begin
  result:=empty;
  while flag<>0 do sleep(1);
  flag:=Mythreadflag;
  result:=Myvalue;
  flag:=0;
end;

Ob das mit dem sleep so der Bringer ist, keine Ahnung, Ich habe bisher immer nur mit Messages gearbeitet, da brauch ich das nicht.

Gruß
K-H

[a.def]

Es handelt sich hierbei um einen Record.
Ich greife aus einer TObjectList auf ein Object zu. Das wird gecastet (Typ des Records)

Im Prinzip

Delphi-Quellcode:

aGlobal.iCurrentItemGlobal := TProcess_Record(aFileList.Items[i_]); // iCurrentItemGlobal ist vom Typ TProcess_Record.

Zitat:

Da hilft auch das Queue nicht. Das sorgt zwar für ein sicheres Schreiben, aber erzwingt nicht eine bestimmte Reihenfolge.

Die Reihenfolge ist eigentlich total egal. Nur das Schreiben muss sicher sein. Demnach würde Queue schon ausreichen?

[Uwe Raabe]

Zitat:

Zitat von a.def (Beitrag 1357448)

Im Prinzip

Delphi-Quellcode:

aGlobal.iCurrentItemGlobal := TProcess_Record(aFileList.Items[i_]); // iCurrentItemGlobal ist vom Typ TProcess_Record.

...
Die Reihenfolge ist eigentlich total egal. Nur das Schreiben muss sicher sein. Demnach würde Queue schon ausreichen?

Wieso ist die Reihenfolge egal? Was soll

Delphi-Quellcode:

aGlobal.iCurrentItemGlobal

denn am Ende beinhalten, bzw. wann wird damit etwas gemacht?

[a.def]

Diese Variable dient nur zur Anzeige. Ein anderer Thread bedient lesend sich dieser Variable.
Daher ist die Reihenfolge vollkommen egal.