Класс объектового фильтра слоя
property LayerObjectFilterBitStore[lCode: Integer]: TBitStore;
var bs: TBitStore; oIndex: integer; begin bs:=Mappl.LayerObjectFilterClass[lCode]; Count:=bs.Count; oIndex:=bs.FirstID; while oIndex >= 0 do oIndex:=bs.NextID; end;