TIsPointerOrObjectPtrToBaseOfImpl