sasbot преди 4 години
родител
ревизия
5ed8e6ae06
променени са 1 файла, в които са добавени 2 реда и са изтрити 2 реда
  1. +2
    -2
      _Genshtab/ggc/karta_ggc_all.zmp/GetUrlScript.txt

+ 2
- 2
_Genshtab/ggc/karta_ggc_all.zmp/GetUrlScript.txt Целия файл

@@ -10,9 +10,9 @@ begin
end;
if GetZ < 13 then
ResultURL := BaseUrl+'2km.png'+'/z'+inttostr(GetZ-1)+'/'+inttostr(GetY)+'/'+inttostr(GetX)+'.png'
ResultURL := BaseUrl+'2km.png'+'/z'+inttostr(getz)+'/'+inttostr(getx div 1024)+'/x'+inttostr(getx)+'/'+inttostr(gety div 1024)+'/y'+inttostr(gety)+'.png'
else if getz <14 then
ResultURL := BaseUrl+'1km'+'/z'+inttostr(getz)+'/'+inttostr(getx div 1024)+'/x'+inttostr(getx)+'/'+inttostr(gety div 1024)+'/y'+inttostr(gety)+'.png'
ResultURL := BaseUrl+'1km.png'+'/z'+inttostr(getz)+'/'+inttostr(getx div 1024)+'/x'+inttostr(getx)+'/'+inttostr(gety div 1024)+'/y'+inttostr(gety)+'.png'
else if getz <15 then
ResultURL := BaseUrl+'500m.png'+'/z'+inttostr(getz)+'/'+inttostr(getx div 1024)+'/x'+inttostr(getx)+'/'+inttostr(gety div 1024)+'/y'+inttostr(gety)+'.png'
else


Зареждане…
Отказ
Запис