Source position: controls.pp line 2767
function CompareDataObjectWithLazAccessibleObject(
o: Pointer;
ao: Pointer
):Integer;