Код следующего слоя проекта карты
property NextLayerCode: integer;
Перед циклом, включающим вызов метода, необходимо обратиться к свойству FirstLayerCode