| @@ -1,25 +1,5 @@ | |||||
| var | |||||
| TL, M: TDoublePoint; | |||||
| BR, N: TDoublePoint; | |||||
| begin | begin | ||||
| TL.X := GetLLon; | |||||
| TL.Y := GetTLat; | |||||
| BR.X := GetRLon; | |||||
| BR.Y := GetBLat; | |||||
| ResultURL:=GetURLBase+RoundEx(GetLLon,8)+','+RoundEx(GetBLat,8)+','+RoundEx(GetRLon,8)+','+RoundEx(GetTLat,8)+'&WIDTH=256&HEIGHT=256'; | |||||
| end. | |||||
| if Assigned(DefProjConverter) then begin | |||||
| M := DefProjConverter.LonLat2XY(TL); | |||||
| N := DefProjConverter.LonLat2XY(BR); | |||||
| ResultURL := GetURLBase + RoundEx(M.X, 9) + ',' + RoundEx(N.Y, 9) + ',' + RoundEx(N.X, 9) + ',' + RoundEx(M.Y, 9); | |||||
| end else begin | |||||
| ResultURL := 'invalid_url'; | |||||
| end; | |||||
| RequestHead:='User-Agent: Opera/9.80 (Windows NT 6.1) Presto/2.12.388 Version/12.16' + #13#10 + | |||||
| 'Accept: text/html, application/xml;q=0.9, application/xhtml+xml, image/png, image/webp, image/jpeg, image/gif, image/x-xbitmap, */*;q=0.1' + #13#10 + | |||||
| 'Accept-Language: ru-RU,ru;q=0.9,en;q=0.8' + #13#10 + | |||||
| 'Accept-Encoding: gzip, deflate' + #13#10 + | |||||
| 'Referer: http://kso2.lantmateriet.se/' + #13#10 + | |||||
| 'Host: kso.lantmateriet.se' + #13#10 + | |||||
| 'Cookie: WebTrends=188.95.188.26.1392695245204688' + #13#10 + | |||||
| 'Connection: keep-alive' + #13#10; | |||||
| end. | |||||
| @@ -1,32 +1,24 @@ | |||||
| [PARAMS] | [PARAMS] | ||||
| pnum=44 | |||||
| GUID={5DBB0B87-766C-41A4-A323-836385E8DF71} | |||||
| pnum= | |||||
| GUID={3AC94CEE-5C84-4BD2-9AB3-16109FAE713E} | |||||
| name=SETopowebb | |||||
| name_en=SETopowebb | |||||
| name_uk=SETopowebb | |||||
| asLayer=0 | asLayer=0 | ||||
| name=Lantmateriet.se (Sweden Map) | |||||
| name_en=Lantmateriet.se (Sweden Map) | |||||
| name_uk=Lantmateriet.se (Sweden Map) | |||||
| NameInCache=lantmateriet.se | |||||
| ParentSubMenu=Ëîêàëüíûå êàðòû | |||||
| ParentSubMenu_en=Local maps | |||||
| ParentSubMenu_uk=Ëîêàëüí³ êàðòè | |||||
| DefURLBase=http://kso.lantmateriet.se/karta/ortofoto/wms/v1?LAYERS=orto%2Corto025&EXCEPTIONS=application%2Fvnd.ogc.se_xml&FORMAT=image%2Fpng&TRANSPARENT=TRUE&STYLES=default%2Cdefault&SERVICE=WMS&VERSION=1.1.1&REQUEST=GetMap&SRS=EPSG%3A3006&WIDTH=256&HEIGHT=256&BBOX= | |||||
| ContentType=* | |||||
| defaultContentType=image/png | |||||
| IgnoreContentType=1 | |||||
| Ext=.png | |||||
| separator=0 | |||||
| UseDwn=1 | |||||
| Usestick=0 | |||||
| UseGenPrevious=0 | |||||
| Usedel=1 | |||||
| Usesave=1 | |||||
| UseAntiBan=0 | |||||
| Sleep=0 | |||||
| DefHotKey=80 | |||||
| BanIfLen=0 | |||||
| Enabled2=0 | |||||
| RequestHead=Referer: http://kso2.lantmateriet.se/ | |||||
| DefURLBase=http://vvv.sgu.se/lmvProxy/map?LAYERS=topowebbkartan&FORMAT=image%2Fjpeg&SERVICE=WMS&VERSION=1.1.1&REQUEST=GetMap&STYLES=&EXCEPTIONS=application%2Fvnd.ogc.se_inimage&SRS=EPSG%3A4326&BBOX= | |||||
| projection=1 | projection=1 | ||||
| sradiusa=6378137 | sradiusa=6378137 | ||||
| sradiusb=6356752 | sradiusb=6356752 | ||||
| Proj4Args=+proj=utm +zone=33 +ellps=GRS80 +towgs84=0,0,0,0,0,0,0 +units=m +no_defs | |||||
| ParentSubMenu=Suede | |||||
| ParentSubMenu_en=Suede | |||||
| ParentSubMenu_uk=Suede | |||||
| NameInCache=SETopowebb | |||||
| separator=0 | |||||
| ContentType=image/jpeg,image/png | |||||
| MimeTypeSubst=image/png=image/jpeg | |||||
| DefaultContentType=image/jpeg | |||||
| Ext=.jpg | |||||
| UseDwn=1 | |||||
| Sleep=0 | |||||
| DefHotKey= | |||||