Hi,
du kannst dazu eine sogenannte CriticalSection benutzen (in C(++)/Linux auch als
Mutex bekannt):
Delphi-Quellcode:
var SampleLock:TCriticalSection;
procedure Kritisch;
begin
SampleLock.Acquire;
try
// tu was
finally
SampleLock.Release;
end;
end;
Versucht nun, ein anderer Thread "Kritisch" aufzurufen, blockiert der Aufruf von Acquire solange, bis der SampleLock vom anderen Thread per Release freigegeben wurde.
cu