Source position: pasresolver.pp line 2331
public function TPasResolver.IndexOfImplementedInterface(
ClassEl: TPasClassType;
aType: TPasType
):Integer;