TCriticalSection
TSynchroObject
TObject