Source position: controls.pp line 2767
function CompareLazAccessibleObjectsByDataObject(
o1: Pointer;
o2: Pointer
):Integer;