//--------------------------------------------------------------------------- #include #pragma hdrstop #include "Global.h" //--------------------------------------------------------------------------- #pragma package(smart_init) //--------------------------------------------------------------------------- // TGuard //--------------------------------------------------------------------------- __fastcall TGuard::TGuard(TCriticalSection * ACriticalSection) : FCriticalSection(ACriticalSection) { DebugAssert(ACriticalSection != NULL); FCriticalSection->Enter(); } //--------------------------------------------------------------------------- __fastcall TGuard::~TGuard() { FCriticalSection->Leave(); } //--------------------------------------------------------------------------- // TUnguard //--------------------------------------------------------------------------- __fastcall TUnguard::TUnguard(TCriticalSection * ACriticalSection) : FCriticalSection(ACriticalSection) { DebugAssert(ACriticalSection != NULL); FCriticalSection->Leave(); } //--------------------------------------------------------------------------- __fastcall TUnguard::~TUnguard() { FCriticalSection->Enter(); } //---------------------------------------------------------------------------