Verstehe ich richtig, dass Du prüfen willst, ob Dein Objekt nicht nur IInterfB sondern auch IInterfA unterstützt?
Dann ginge das vielleicht so:
Delphi-Quellcode:
TImplB = class(TInterfacedObject, IInterfB, IInterfA)
...
var
lA: IInterfA;
if Supports(lB, IInterfB, lA) then
DoSomething(lA);
Das geht mit jedem Interface, unabhängig davon, ob es sich um Ableitungen handelt oder nicht.