소스 검색

update zmp

undefined
sasgis 54 년 전
부모
커밋
6fe3c07b27
3개의 변경된 파일6개의 추가작업 그리고 6개의 파일을 삭제
  1. +2
    -2
      _water/navionics.SonarChart.zmp/GetUrlScript.txt
  2. +3
    -3
      _water/navionics.zmp/GetUrlScript.txt
  3. +1
    -1
      _water/navionics.zmp/params.txt

+ 2
- 2
_water/navionics.SonarChart.zmp/GetUrlScript.txt 파일 보기

@@ -50,8 +50,8 @@ begin
if (Result = '') and Assigned(Downloader) then begin
VTimeStamp := IntToStr(GetUnixTime);
VRequestUrl := 'https://backend.navionics.io/tile/get_key/Navionics_internalpurpose_00001/webapiv2.navionics.com?_=' + VTimeStamp;
VRequestHeader := 'Origin: https://webapiv2.navionics.com' + #13#10 + 'Referer: https://webapiv2.navionics.com/examples/4000_gNavionicsOverlayExample.html';
VRequestUrl := 'http://backend.navionics.io/tile/get_key/Navionics_internalpurpose_00001/webapp.navionics.com?_=' + VTimeStamp;
VRequestHeader := 'Origin: http://webapp.navionics.com' + #13#10 + 'Referer: http://webapp.navionics.com/';
VResponseHeader := '';
VResponseData := '';
VResponseCode := Downloader.DoHttpRequest(VRequestUrl, VRequestHeader, '', VResponseHeader, VResponseData);


+ 3
- 3
_water/navionics.zmp/GetUrlScript.txt 파일 보기

@@ -14,7 +14,7 @@
//******************************************************************************
const
cReqParams = 'LAYERS=config_1_10.00_0&TRANSPARENT=FALSE&UGC=FALSE';
cReqParams = 'LAYERS=config_1_20.00_0&TRANSPARENT=FALSE&UGC=TRUE';
//******************************************************************************
@@ -50,8 +50,8 @@ begin
if (Result = '') and Assigned(Downloader) then begin
VTimeStamp := IntToStr(GetUnixTime);
VRequestUrl := 'https://backend.navionics.io/tile/get_key/Navionics_internalpurpose_00001/webapiv2.navionics.com?_=' + VTimeStamp;
VRequestHeader := 'Origin: https://webapiv2.navionics.com' + #13#10 + 'Referer: https://webapiv2.navionics.com/examples/4000_gNavionicsOverlayExample.html';
VRequestUrl := 'http://backend.navionics.io/tile/get_key/Navionics_internalpurpose_00001/webapp.navionics.com?_=' + VTimeStamp;
VRequestHeader := 'Origin: http://webapp.navionics.com' + #13#10 + 'Referer: http://webapp.navionics.com/';
VResponseHeader := '';
VResponseData := '';
VResponseCode := Downloader.DoHttpRequest(VRequestUrl, VRequestHeader, '', VResponseHeader, VResponseData);


+ 1
- 1
_water/navionics.zmp/params.txt 파일 보기

@@ -11,4 +11,4 @@ projection=1
sradiusa=6378137
sradiusb=6378137
IsUseDownloaderInScript=1
RequestHead=Referer: https://webapiv2.navionics.com/examples/4000_gNavionicsOverlayExample.html
RequestHead=Referer: http://webapp.navionics.com/

불러오는 중...
취소
저장