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