обычный вроде логгер. что там хайлоадного? и конструкция вида:
if not Assigned(LoggerObject) then LoggerObject := TDlogger.Create(nil);
c синхронизацией только внутри Create() не выглядит потокобезопасной
Держит файл открытым 200мс, потом закрывает. Если поток событий большой, файл закрывается периодически, чтобы не потерять данные при сбое. И он синглтон по дефолту, но можно несколько экземпляров создать для разных файлов