Как определить номер слоя по коду или ключу объекта

Здравствуйте!

Необходимо определить номер слоя по коду или ключу объекта.

Пробовал так:

mapGetRscObject(form_main.MapRsc1.RscHandle,i,RscObject);
LocInt := RscObject.Local;
ExCodeInt := RscObject.Code;

ShowMessage ('ExCodeInt = '+IntToStr(ExCodeInt)); // Здесь хорошо возвращается код объекта

ObjName := String(RscObject.Name);

ShowMessage ('ObjName = '+ObjName);

// ObjNum := mapGetRscObjectIdentIncode(form_main.MapRsc1.RscHandle,ExCodeInt); // Так пробовал, результат возвращает 0

ObjNum := mapGetRscObjectCodeByKey(form_main.MapRsc1.RscHandle,PAnsiChar(IntToStr(ExCodeInt))); // Так пробовал, результат возвращает 0

ShowMessage ('ObjNum = '+IntToStr(ObjNum));

// LayerNum := mapGetRscObjectSegment(form_main.MapRsc1.RscHandle,ExCodeInt); // Так пробовал, результат возвращает 0

LayerNum := mapGetRscObjectSegment(form_main.MapRsc1.RscHandle,ObjNum); // Так пробовал, результат возвращает 0

ShowMessage ('LayerNum = '+IntToStr(LayerNum));