Aquire Singleton class Instance Multithread

Aby uzyskać instancję klasy ze wzorem Singleton, chcę użyć następującej funkcji:To jest szkic

Jak zdobyć elementy po nazwie w Delphi Chromium Embedded?