Hier geht es um Klassen, nicht Instanzen.
Einen sauberen Weg gibt es nicht, aber hier im Forum geistert eine
Unit herum, mit der man alle Typinformationen in einem Modul auflisten kann. Damit ist es dann trivial, weil in den Typinformationen der Klasse auch die TClass gespeichert ist.