Подскажите позжлста, есть ли для KOL процедуры подобные тем что в стандартном SyncObjs.pas ? Нужен класс TCriticalSection. Не охота переписывать, если уже есть готовое.

Спасибо!

А что там в TCriticalSection такого хорошего чего не делает код ниже?

critsec: TRTLCriticalSection;

InitializeCriticalSection(critsec);
EnterCriticalSection(critsec);
try

finally
    LeaveCriticalSection(critsec);
end;
DeleteCriticalSection(critsec);

:) Ну да, Спасибо!