function AncestorNameMatches(ClassType: TClass; AncestorClass: TClass): Boolean;
Boolean AncestorNameMatches(TClass ClassType, TClass AncestorClass);
DesignEditors
This is function DesignEditors.AncestorNameMatches.