Модератор: Tolik
YBI писал(а):))спасибо, а цмп поможете сделать?
YBI писал(а):цмп поможете сделать?
YBI писал(а):из прямой длинной ссилки на тайл взять корень которий нужно подменить
https://geoservice.dlr.de/eoc/land/wms?SERVICE=WMS&VERSION=1.1.1&REQUEST=GetMap&FORMAT=image%2Fpng8&TRANSPARENT=true&LAYERS=GUF28_DLR_v1_Mosaic&STYLES=guf_8bit_bw&SRS=EPSG%3A4326&WIDTH=256&HEIGHT=256&BBOX=
-74.46670532226562%2C40.50642013549805%2C-72.81875610351562%2C40.88029861450195
var i:integer;
xy: TPoint;
topLeftM,bottomrightM :TDoublePoint;
begin
xy.x:=GetX;
xy.y:=GetY;
topLeftM:=Converter.Pos2LonLat(XY,GetZ-1);
xy.x:=GetX+1;
xy.y:=GetY+1;
bottomrightM:=Converter.Pos2LonLat(XY,GetZ-1);
//выставляем точность округления (нужное кол-во знаков после запятой) и разделители точно как в тексте запроса
//а также надо проверить, не перепутаны ли в запросе верх(topLeftM.y) и низ(bottomrightM.y)
ResultURL := GetURLBase + RoundEx(topLeftM.x,14)+'%2C'+RoundEx(bottomrightM.y,14)+'%2C'+RoundEx(bottomrightM.x,14)+'%2C'+RoundEx(topLeftM.y,14);
end;
obtim писал(а):А можно сделать решение для карты молний?
https://www.lightningmaps.org/?lang=en# ... dl=2;dc=0;
TSA писал(а):obtim писал(а):А можно сделать решение для карты молний?
https://www.lightningmaps.org/?lang=en# ... dl=2;dc=0;
Дерзайте
Сейчас этот форум просматривают: ingener и гости: 11