Ver código fonte

update zmp

master
sasbot 4 anos atrás
pai
commit
5ed8e6ae06
1 arquivos alterados com 2 adições e 2 exclusões
  1. +2
    -2
      _Genshtab/ggc/karta_ggc_all.zmp/GetUrlScript.txt

+ 2
- 2
_Genshtab/ggc/karta_ggc_all.zmp/GetUrlScript.txt Ver arquivo

@@ -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


Carregando…
Cancelar
Salvar