자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다. 
  • 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)

Delphi Delphi 10.4.1 Sydney - 위치변경후..주소변환 오류문의

2020.12.04 17:39

silkroad99 조회 수:301

안녕하세요
델파이 10.3.3에서 까지 문제없이 잘 되었는데

이번에 api29 이사 업데이트 해야 되서 

Delphi 10.4.1 새로 설치해서 사용하고 있습니다.

 

문제점)

......

.....

procedure TServiceModule.Location_Data_Save_Processing;

begin

   if not Assigned(FGeocoder) then

   begin

       if Assigned(TGeocoder.Current) then FGeocoder := TGeocoder.Current.Create;

       if Assigned(FGeocoder) then FGeocoder.OnGeocodeReverse := OnGeocodeReverseEvent;

   end;

 

   if Assigned(FGeocoder) and not FGeocoder.Geocoding then

   begin

       FGeocoder.GeocodeReverse(Last_Find_Location2D);

   end;

end;

 

procedure TServiceModule.OnGeocodeReverseEvent(const Address: TCivicAddress);

begin

  Try

    l_location_address_name := '';

    l_location_address_name := l_location_address_name + (Address.CountryName);

    l_location_address_name := l_location_address_name + ' ' + (Address.AdminArea);

    l_location_address_name := l_location_address_name + ' ' + (Address.Locality);

    l_location_address_name := l_location_address_name + ' ' + (Address.Thoroughfare);

    l_location_address_name := l_location_address_name + ' ' + (Address.FeatureName);

  Except

    on err:exception do

    begin

      Exit;

    end;

  end;

end;

.....

이렇게 하면 위치코드는 변경이 되는데...
주소를 조회하면 처음에 주소가 변경되지 않고 계속조회됩니다.

위도와 경도는 확인해 보면 변경되는것을 확인했는데..주소만 변경이 안되는경우 입니다.

 

고수님들의 답변을 부탁드립니다.

 

이 게시물을
목록
목록
번호 제목 글쓴이 날짜 조회 수
공지 [프로그래밍 강의] 2021.6~2021.12 관리자 2015.01.22 17155
공지 유용한 관련 사이트 관리자2 2014.03.20 56022
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 99453
1973 [RAD서버-201703 세미나] 모바일 화면디자인에 도움이 되는 샘플안내 부탁드립니다. 험프리 2017.03.17 104
1972 TFMTBCDField 필드 type 사용방법에 대해 문의드립니다 [1] delphi 2015.09.17 104
1971 컴포넌트 사용 관련 [1] 똘귀아빠 2015.10.23 104
1970 다국어 지원 관련 XE6 update1 오류 발생 문의 [1] file spirng 2015.09.09 105
1969 *.DPC 컴포넌트 설치 질문 [1] 연일하 2016.08.30 106
1968 RADSTUDIO 10(Seattle) 의 dbGo 팔레트에서 ADOStoredProc 관련 소스코드를 찾습니다. 한태수 2019.12.05 106
1967 ArcGIS - Delphi Component 문의 연일하 2016.10.13 107
1966 실행파일 생성 오류가 발생하네요 뭐가 잘 못 되었을까요 [1] 백거 2016.10.27 107
1965 시애틀을 사용하고 있는데, 베를린 업데이트2를 설치하려고 합니다. 삭제 후 설치해야 하나요? 관리자 2017.01.05 107
1964 [공유] FireDAC 로그인 창이 표시되는데요 어떻게 표시하지 않나요? file 험프리 2017.07.05 107
1963 [100%활용 세미나] RAD서버와 엔터프라이즈 커넥터를 구매하지 않고 사용가능한가요? 험프리 2017.11.10 107
1962 paclientcore240.bpl를 다운받었는데 어떻게 사용하는지? [2] 화이부동 2016.09.03 108
1961 [10.2 도쿄 출시세미나] 리눅스용 소프트웨어 개발이 가능한가요? 그리고 리눅스용 소프트 웨어 개발이 가능하다면 GUI환경만 지원하나요? 아니면 터미널에서도 사용가능한가요? 험프리 2017.04.06 108
1960 [질문] Ribbon 의 MaxIcon을 Enabled = False 또는 Visible = false를 줄 수 없나요? 바람돌이 2016.05.11 108
1959 원격서버(호스팅서버)에 데이터스냅 미들웨어 배포하는 방법 운직 2020.01.31 109
1958 [마이그레이션 세미나] 데이터스냅에 대한 팁 또는 샘플자료 부탁합니다. 험프리 2015.11.24 109
1957 Medaiplayer 컴포넌트 사용시 영상 길이 제한이 있나요? eric 2016.09.22 110
1956 10.3 Starter Edition 관련 Overload 문제건 [2] 한태수 2019.09.30 110
1955 [베를린 10.1] 안드로이드앱에 Webbrowser 넣고 스트리밍 재생시.. 현동노 2019.12.15 110
1954 비콘 pky4437 2019.12.16 110
쓰기
태그