자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다. 
  • 제품설치/등록 오류 문의: 설치/등록 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 15914
공지 유용한 관련 사이트 관리자2 2014.03.20 54718
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 98172
1973 styleelements [1] timerobb 2016.10.25 98
1972 [RAD서버-201703 세미나] 모바일 화면디자인에 도움이 되는 샘플안내 부탁드립니다. 험프리 2017.03.17 98
1971 paclientcore240.bpl를 다운받었는데 어떻게 사용하는지? [2] 화이부동 2016.09.03 99
1970 fmx에서 안드로이드 BT 질문 [1] 나즈나 2016.09.26 99
1969 [마이그레이션 세미나] 데이터스냅에 대한 팁 또는 샘플자료 부탁합니다. 험프리 2015.11.24 99
1968 컴포넌트 사용 관련 [1] 똘귀아빠 2015.10.23 100
1967 Medaiplayer 컴포넌트 사용시 영상 길이 제한이 있나요? eric 2016.09.22 101
1966 몇몇 데모 앱들이 OSX에서 실행시 PAServer 상에 오류가납니다. [1] file devdevil0625 2015.09.23 101
1965 [질문] Ribbon 의 MaxIcon을 Enabled = False 또는 Visible = false를 줄 수 없나요? 바람돌이 2016.05.11 101
1964 [델파이 부트캠프] 델파이가 어떻게 바뀌고 있는지 궁금하네요. 험프리 2016.09.30 102
1963 [100%활용 세미나] RAD서버와 엔터프라이즈 커넥터를 구매하지 않고 사용가능한가요? 험프리 2017.11.10 102
1962 구글플레이에 올릴려면 리오로 apk를 생성하면 된가요? [2] 화이부동 2018.12.19 102
1961 원격서버(호스팅서버)에 데이터스냅 미들웨어 배포하는 방법 운직 2020.01.31 102
1960 안드로이드 64비트 컴파일시 옵션이 안보임 [1] file 화이부동 2020.06.09 102
1959 LIstView 레이아웃 작업중에 질문드립니다~! syc 2017.03.10 102
1958 유투브에 올라온 인형만들기 연습중 알게되었습니다. 쭈니아빠 2016.07.16 103
1957 *.DPC 컴포넌트 설치 질문 [1] 연일하 2016.08.30 103
1956 실행파일 생성 오류가 발생하네요 뭐가 잘 못 되었을까요 [1] 백거 2016.10.27 103
1955 시애틀을 사용하고 있는데, 베를린 업데이트2를 설치하려고 합니다. 삭제 후 설치해야 하나요? 관리자 2017.01.05 103
1954 [공유] FireDAC 로그인 창이 표시되는데요 어떻게 표시하지 않나요? file 험프리 2017.07.05 103
쓰기
태그