Código de Delphi - Patron Singleton

Implementación en una classe log (monitorizador de eventos) del patrón Singleton, útil para asegurarse de que tenemos una sola instancia de un objeto de una determinada clase.