Und das ist ja wohl grober Unfug
Delphi-Quellcode:
InitializeCriticalSection(FLock);
EnterCriticalSection(FLock);
// do something
LeaveCriticalSection(FLock);
DeleteCriticalSection(FLock);
Du erzeugst dir bei jedem Aufruf eine CriticalSection und überschreibst dabei auch noch den Wert, der in einem anderen ThreadContext evtl. gerade benutzt wird.
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ea 0a 4c 14 0d b6 3a a4 c1 c5 b9
dc 90 9d f0 e9 de 13 da 60)