자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다. 
  • 제품설치/등록 오류 문의: 설치/등록 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 15813
공지 유용한 관련 사이트 관리자2 2014.03.20 54615
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 98060
1899 InputBox, InputQueryAsync 등등 입력창 폰트색상 문의드립니다. [1] file 돌팅 2018.02.22 298
1898 [시작하는 사람들을 위한 델파이 프로그래밍] 모듈 8 - Exercise 4 관리자 2016.05.02 299
1897 블루투스 터미널 앱을 만들고싶습니다. 데이터 수신은 어떻게하나요? [1] Rarity 2018.09.09 299
1896 uses절에 포함된 유닛의 타입을 가져다 쓰려면 어떻게 해야 하나요? [3] 한태수 2019.09.16 299
1895 XE8 프로젝트 오픈후 일정한 폼이안열리는이유? silkroad99 2015.04.23 299
1894 안드로이드 해상도 관련한 질문입니다. [1] WPAPPs 2015.11.02 299
1893 FireDac 에서 informix 연결이 안됩니다.. 도와주세요 [2] file 천공인 2020.09.18 299
1892 XE 버전과 호환가능한 Windows 버전 알려주세요....ㅜㅜ [5] soo583 2018.03.19 300
1891 파이어몽키 소켓통신 - 질문수정 [2] hs 2019.12.17 300
1890 안드로이드, Win CE관련 질문 드립니다. [1] 공감 2016.10.24 301
1889 쇼핑몰 결제시스템 연동 문의 지병철 2018.04.23 301
1888 Entera 연결을 위한 컴퍼넌트 질문 드립니다. [1] 칸타타 2016.02.29 301
1887 MDI프로그램에서 마우스 휠 동작시 Stack Overflow 발생 [1] nuribit 2020.09.24 301
» Delphi 10.4.1 Sydney - 위치변경후..주소변환 오류문의 [1] silkroad99 2020.12.04 301
1885 10 seattle 배포파일 생성이 되지 않습니다. [1] 이정규 2016.06.10 302
1884 델파이 폼 팅김 현상 [1] 생각 2018.02.06 302
1883 소스코드 편집 창에서 블럭 선택 오류 [2] 오랜동안 2018.02.26 302
1882 datasnap 구현 미들웨어 세션 물고 있는 현상 [1] 생각 2018.03.15 302
1881 [질문] FMX화면에서 싸인이 가능한가요? [2] 화현 2021.07.22 302
1880 install component 메뉴가 없어요. [1] 우석이 2015.03.18 303
쓰기
태그