SASGIS

Веб-картография и навигация

РосРеестр Кадастровые границы

Материалы от РосКосмоса, ГГЦ, РосРеестра, КосмоСнимков

Модератор: Tolik

Re: РосРеестр Кадастровые границы

Сообщение samsomus » 30 окт 2024, 11:30

ingener писал(а):нафиг снесли X[/b] и Y?!
у вас:
ResultURL:=GetURLBase+RoundEx(GetLMetr,-5,10)+','+RoundEx(GetBMetr,-2,10)+','+RoundEx(GetRMetr,-5,10)+','+RoundEx(GetTMetr,-2,10);
а должно быть :
ResultURL:=GetURLBase+RoundEx(GetLMetr,x-5,10)+','+RoundEx(GetBMetr,y-2,10)+','+RoundEx(GetRMetr,x-5,10)+','+RoundEx(GetTMetr,y-2,10);
Ессно после каждого исправления и сохранения скрипта надо перезапускать прогу.


странно, но у меня изначально скрипт выглядит вот так:

Код: Выделить всё
begin
ResultURL:=GetURLBase+RoundEx(GetLMetr,10)+','+RoundEx(GetBMetr,10)+','+RoundEx(GetRMetr,10)+','+RoundEx(GetTMetr,10);
end.


Подставил ваш вариант. Увы, вообще ничего не изменилось. А еще выдает ошибку
err.jpeg

У вас программа 2020 года, судя по скрину? У меня крайняя версия и, похоже форматы скриптов разные, или я чего-то не понимаю

Можете скинуть ваш zmp?
samsomus
Постигающий Дао
 
Сообщения: 227
Зарегистрирован: 02 фев 2009, 23:14
Благодарил (а): 275 раз.
Поблагодарили: 8 раз.

Re: РосРеестр Кадастровые границы

Сообщение Lidiver » 30 окт 2024, 12:14

begin
ResultURL:=GetURLBase+RoundEx(GetLMetr-5,10)+','+RoundEx(GetBMetr-2,10)+','+RoundEx(GetRMetr-5,10)+','+RoundEx(GetTMetr-2,10);
end.
Аватара пользователя
Lidiver
Новичок
 
Сообщения: 10
Зарегистрирован: 26 сен 2019, 15:28
Откуда: Uglich
Благодарил (а): 1 раз.
Поблагодарили: 9 раз.

Re: РосРеестр Кадастровые границы

Сообщение samsomus » 30 окт 2024, 12:41

у меня так и было, но ничего не меняется на карте

PS удалил кэш вроде свежее качается с изменениями
Все спасибо за участие!
samsomus
Постигающий Дао
 
Сообщения: 227
Зарегистрирован: 02 фев 2009, 23:14
Благодарил (а): 275 раз.
Поблагодарили: 8 раз.

Re: РосРеестр Кадастровые границы

Сообщение ingener » 30 окт 2024, 16:37

samsomus писал(а):...странно, но у меня изначально скрипт выглядит вот так:
Код: Выделить всё
begin
ResultURL:=GetURLBase+RoundEx(GetLMetr,10)+','+RoundEx(GetBMetr,10)+','+RoundEx(GetRMetr,10)+','+RoundEx(GetTMetr,10);
end.

samsomus, теперь понятно - у вас набор слоев от Slinger-а. Там совсем другой принцип построения скрипта использован, упрощенный. Про сдвиг в нем ничего сказать не могу, особо не копался.
Поэтому этот мой метод сдвига работает, естественно, только с моим набором "Rosreestr_new-20.09.2022.zip"(на первой странице, полный набор всех слоев Росреестра, с разбивкой на подменю). Какой набор лучше - вам решать.
У меня GetUrlScript.txt такой:
скрытый текст: показать
var i:integer;
xy:TPoint;
topLeftM,bottomrightM,LL:TDoublePoint;
begin
if (GetX mod 4 = 0) and (GetY mod 4 = 0) then
begin
xy.x:=GetX*256;
xy.y:=GetY*256;
LL:=Converter.Pos2LonLat(XY,GetZ+7);
topLeftM:=Converter.LonLat2Metr(LL);
xy.x:=(GetX+4)*256;
xy.y:=(GetY+4)*256;
LL:=Converter.Pos2LonLat(XY,GetZ+7);
bottomrightM:=Converter.LonLat2Metr(LL);
ResultURL:=GetURLBase + RoundEx(topLeftM.x,10) +','+RoundEx(topLeftM.y,10)+','+RoundEx(bottomrightM.x,10) +','+RoundEx(bottomrightM.y,10) +'&bboxSR=102100&imageSR=102100&size=1024%2C1024&transparent=true&f=image&_ts=false';
end
end.

params.txt тоже отличается:
скрытый текст: показать
[PARAMS]
pnum=9
GUID={56f80aef-120a-4597-85fc-dde57e129f70}
asLayer=1
ParentSubMenu_ru=Росреестр\Земельные участки и ОКС
ParentSubMenu=Rosreestr\Land plots and OKS
name=21-Земельные участки все(22,23,24,25,26,27,28,29)
name_en=Land plots all(21,22,23,24,25,26_27,28,29)
NameInCache=cadastr-21-land_plots_all
DefURLBase=https://pkk.rosreestr.ru/arcgis/rest/services/PKK6/CadastreObjects/MapServer/export?layers=show%3A21&dpi=96&format=PNG32&bbox=
ContentType="image/png"
Ext=.png
EPSG=3785
separator=0
UseDwn=1
Sleep=0
DefHotKey=0
CutCountX=4
CutCountY=4
CutSizeX=256
CutSizeY=256
CutTileX=0
CutTileY=0
MaxConnectToServerCount=1

RequestHead=Referer:https://pkk.rosreestr.ru\r\nConnection: keep-alive\r\nUser-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/109.0.0.0 Safari/537.36\r\nAccept: image/webp,image/apng,image/*,*/*;q=0.8\r\nAccept-Encoding: gzip, deflate\r\nAccept-Language: ru,en-US;q=0.9,en;q=0.8

License= © Rosreestr

Скрины подменю:
скрытый текст: показать
-1.jpg
-2.jpg
-3.jpg
-4.jpg
-5.jpg
Don’t panic - прорвемся !
ingener
Советчик
 
Сообщения: 430
Зарегистрирован: 24 ноя 2010, 18:45
Откуда: г. Хабаровск, +7 часов до МКАД
Благодарил (а): 1056 раз.
Поблагодарили: 399 раз.

Пред.

Вернуться в РосКосмос, ГГЦ, РосРеестр, КосмоСнимки

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 2