procedure Lock; virtual;
virtual void __fastcall Lock();
Prevents other threads from accessing the type registry.
Lock uses a critical section to prevent simultaneous use of the type registry by multiple threads in the same application. Once one thread has called Lock to obtain access to the type registry, no other thread can return from the Lock method until the first thread has called the UnLock method to release its lock.