Hallo barf00s und nochmal Hagen,
Routinen der Art
Supports und
HasInterface beantworten wie skizziert die folgende Frage
Zitat:
Unterstützt eine gegebene Klasse ein gegebenes Interface?
mich interessiert aber folgendes:
Zitat:
Welche Typinformation hat das erste (unbekannte) Interface, das eine gegebene Klasse unterstützt?
Die Frage nach dem Interface selbst sowie dessen IID ließe sich mit
TObject.GetInterfaceTable lösen, von dort komme ich aber leider nicht auf eine Referenz von
TTypeInfo.
Aus meiner aktuellen Perspektive bleibt keine andere Möglichkeit, als mit Hagens Routine (s.o.) alle Typinformationen nach einem Interfacetyp mit einem übereinstimmenden IID zu durchsuchen (bzw. in einer suchbaren Struktur zu registrieren).
Ich würde aber gerne eine... sagen wir... Delphi-artige Lösung verwenden
, die wie
AnObject.ClassName auch die nächsten 9 Versionen von Delphi Bestand haben wird und gleichfalls auf Essenziellem beruht, so das ggf. sogar eine spätere Portierung nach .net in Betracht kommt.