diff --git a/_Rosreestr/rosreestr_cadastr.zmp/GetUrlScript.txt b/_Rosreestr/rosreestr_cadastr.zmp/GetUrlScript.txt index c913ee42..ccb5b955 100644 --- a/_Rosreestr/rosreestr_cadastr.zmp/GetUrlScript.txt +++ b/_Rosreestr/rosreestr_cadastr.zmp/GetUrlScript.txt @@ -1,14 +1,3 @@ -var i:integer; - xy:TPoint; - topLeftM,bottomrightM,LL:TDoublePoint; begin - xy.x:=GetX*256; - xy.y:=GetY*256; - LL:=Converter.Pos2LonLat(XY,GetZ+7); - topLeftM:=Converter.LonLat2Metr(LL); - xy.x:=(GetX+1)*256; - xy.y:=(GetY+1)*256; - LL:=Converter.Pos2LonLat(XY,GetZ+7); - bottomrightM:=Converter.LonLat2Metr(LL); - ResultURL:=GetURLBase+'&bbox='+RoundEx(topLeftM.x,8)+','+RoundEx(topLeftM.y,8)+','+RoundEx(bottomrightM.x,8)+','+RoundEx(bottomrightM.y,8); + ResultURL:=GetURLBase+RoundEx(GetLMetr,8)+','+RoundEx(GetBMetr,8)+','+RoundEx(GetRMetr,8)+','+RoundEx(GetTMetr,8); end. \ No newline at end of file diff --git a/_Rosreestr/rosreestr_cadastr.zmp/params.txt b/_Rosreestr/rosreestr_cadastr.zmp/params.txt index 2ed21b1f..55f88b79 100644 --- a/_Rosreestr/rosreestr_cadastr.zmp/params.txt +++ b/_Rosreestr/rosreestr_cadastr.zmp/params.txt @@ -8,13 +8,10 @@ ParentSubMenu_uk= name=Кадастровые границы (rosreestr.ru) name_en=Cadastre map (rosreestr.ru) NameInCache=rosreestr_cadastr -DefURLBase=http://maps.rosreestr.ru/arcgis/rest/services/Cadastre/Cadastre/MapServer/export?dpi=96&transparent=true&format=png32&bboxSR=102100&imageSR=102100&size=256%2C256&f=image -ContentType="image/png" +DefURLBase=http://maps.rosreestr.ru/arcgis/rest/services/Cadastre/Cadastre/MapServer/export?dpi=96&transparent=true&format=png32&bboxSR=102100&imageSR=102100&size=256%2C256&f=image&bbox= +ContentType=image/png Ext=.png projection=1 sradiusa=6378137 sradiusb=6378137 -separator=0 -UseDwn=1 -Sleep=0 -DefHotKey=0 +UseDwn=1 \ No newline at end of file diff --git a/_Rosreestr/rosreestr_hyb.zmp/GetUrlScript.txt b/_Rosreestr/rosreestr_hyb.zmp/GetUrlScript.txt index 9ecc8775..e9804e50 100644 --- a/_Rosreestr/rosreestr_hyb.zmp/GetUrlScript.txt +++ b/_Rosreestr/rosreestr_hyb.zmp/GetUrlScript.txt @@ -1,3 +1,3 @@ begin - ResultURL:=GetURLBase+'/'+inttostr(GetZ-1)+'/'+inttostr(GetY)+'/'+inttostr(GetX)+'.png'; + ResultURL:=GetURLBase+inttostr(GetZ-1)+'/'+inttostr(GetY)+'/'+inttostr(GetX); end. \ No newline at end of file diff --git a/_Rosreestr/rosreestr_hyb.zmp/params.txt b/_Rosreestr/rosreestr_hyb.zmp/params.txt index d2dc3ad4..3f292f7d 100644 --- a/_Rosreestr/rosreestr_hyb.zmp/params.txt +++ b/_Rosreestr/rosreestr_hyb.zmp/params.txt @@ -8,14 +8,10 @@ ParentSubMenu_uk= Name=Гибрид (rosreestr.ru) name_en=Hybrid (rosreestr.ru) NameInCache=Rosreestr_hyb -DefURLBase=http://maps.rosreestr.ru/ArcGIS/rest/services/BaseMaps/Anno/MapServer/tile -DefaultContentType=image/png -ContentType=image/png32 +DefURLBase=http://b.maps.rosreestr.ru/arcgis/rest/services/BaseMaps/Anno/MapServer/tile/ +ContentType=image/png Ext=.png projection=1 sradiusa=6378137 sradiusb=6378137 -separator=0 -UseDwn=1 -Sleep=0 -DefHotKey= +UseDwn=1 \ No newline at end of file diff --git a/_Rosreestr/rosreestr_landuse.zmp/GetUrlScript.txt b/_Rosreestr/rosreestr_landuse.zmp/GetUrlScript.txt index 1cd0e999..ccb5b955 100644 --- a/_Rosreestr/rosreestr_landuse.zmp/GetUrlScript.txt +++ b/_Rosreestr/rosreestr_landuse.zmp/GetUrlScript.txt @@ -1,3 +1,3 @@ - begin - ResultURL:=GetURLBase+RoundEx(GetLMetr,10)+','+RoundEx(GetBMetr,10)+','+RoundEx(GetRMetr,10)+','+RoundEx(GetTMetr,10); +begin + ResultURL:=GetURLBase+RoundEx(GetLMetr,8)+','+RoundEx(GetBMetr,8)+','+RoundEx(GetRMetr,8)+','+RoundEx(GetTMetr,8); end. \ No newline at end of file diff --git a/_Rosreestr/rosreestr_landuse.zmp/params.txt b/_Rosreestr/rosreestr_landuse.zmp/params.txt index 12085ca1..09accef4 100644 --- a/_Rosreestr/rosreestr_landuse.zmp/params.txt +++ b/_Rosreestr/rosreestr_landuse.zmp/params.txt @@ -9,14 +9,10 @@ name= name_en=Cadastre Landuse (rosreestr.ru) name_uk=Cadastre Landuse (rosreestr.ru) NameInCache=rosreestr_zone -DefURLBase=http://maps.rosreestr.ru/ArcGIS/rest/services/CadastreNew/Thematic/MapServer/export?dpi=96&transparent=true&format=png32&bboxSR=102100&imageSR=102100&size=256%2C256&layers=show%3A3%2C4&f=image&bbox= -ContentType="image/png32" -DefaultContentType=image/png +DefURLBase=http://maps.rosreestr.ru/arcgis/rest/services/Cadastre/Thematic/MapServer/export?dpi=96&transparent=true&format=png32&bboxSR=102100&imageSR=102100&size=256%2C256&layers=show%3A2%2C4&f=image&bbox= +ContentType=image/png Ext=.png projection=1 sradiusa=6378137 sradiusb=6378137 -separator=0 -UseDwn=1 -Sleep=0 -DefHotKey=0 +UseDwn=1 \ No newline at end of file