Найти объекты слоя в точке с экранными координатами
function GetLayerObjectsInScreenPoint(lCode: integer; X,Y,Delta: double;
aObjects: TLayerObjectIdentificationList;
flBlinkFindObjects: boolean = false; flDisplaying: boolean = true;
sFilter: string=''): integer;
X
Y
Delta
aObjects
flBlinkFindObjects
flDisplaying
sFilter
-1 если слой не найден, иначе количество найденных объектов
var lCode,Count: integer; X,Y,Delta: double; oIndexes: TArrayInteger; sFilter: string; begin lCode:=12; X:=100; Y:=100; Delta:=2; sFilter:='OKey > 1000'; Count:=Mappl.GetObjectsInScreenPoint(lCode,X,Y,Delta,@oIndexes,false,true, flHighlightObjects ,flDisplaying,sFilter); if Count > 0 then ................. oIndexes:=nil // чистка массива end;