TObject から派生したクラスは多重継承できません。

そこで、インターフェースで代用しようと思ったんですが、
TObject * しか与えられていない時に、その TObject が
どのインターフェースを継承しているか知る方法はありますでしょうか？

レジストリは使用したくないんで、IUnknown で QueryInterface する以外の
方法で。