Есть ли базовый класс без подсчета ссылок, такой как TInterfacedObject?

Мне нужен базовый класс вроде TInterfacedObject , но без подсчета ссылок (так что своего рода TNonRefCountedInterfacedObject ).

На самом деле это уже n-й раз, когда мне нужен такой класс, и почему-то я всегда заканчиваю тем, что снова и снова пишу (читай: копирую и вставляю) свой собственный. Я не могу поверить, что нет «официального» базового класса, который я могу использовать.

Есть ли где-нибудь в RTL базовый класс, реализующий IInterface , но без подсчета ссылок, из которого я могу получить свои классы?