Source position: tiObject.pas line 536
type TtiObjectListFindCompareFunc = function(
const AObject: TtiObject;
const AValue
):Integer of object;