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