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