Datenaustausch zwischen Threads (Sync)

[FredlFesl]

Zitat von fuchsle:

Delphi-Quellcode:

function ThreadValue.getNO2_10: Double;
begin
  try
    CSNO2_10.Acquire; // lock out other threads 
    Result := FNO2_10;
  finally
    CSNO2_10.Release;
  end;
end;

Das Acquire muss vor das try.

Delphi-Quellcode:

MyCriticalSection.Acquire;
Try
  DoSomethingWhichMightCrash();
Finally
  MyCriticalSection.Release
End;