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

안녕하세요

 

델파이 RIO버젼으로 안드로이드용 앱을 개발하는데

기존까지는 문제없이 잘 되었는데...버젼업을 하면서

생기는 문제입니다.

 

아래는 소스코드입니다.

-------------------------------------------------------------------------------------

procedure TfMain_Form.FormKeyUp(Sender: TObject; var Key: Word;

  var KeyChar: Char; Shift: TShiftState);

var

  FService : IFMXVirtualKeyboardService;

begin

  if Key = vkHardwareBack then

  begin

    TPlatformServices.Current.SupportsPlatformService(IFMXVirtualKeyboardService, IInterface(FService));

 

    if (FService <> nil) and (TVirtualKeyboardState.Visible in FService.VirtualKeyBoardState)  then

    begin

      FService.HideVirtualKeyboard;

      Key := 0;

      Exit;

    end

    else

    if (FService <> nil) then

    begin

      if MessageDlg('Exit Application?', TMsgDlgType.mtConfirmation,

                                                  [TMsgDlgBtn.mbOK, TMsgDlgBtn.mbCancel], -1) = mrOK then

      begin

          // Exit application here...

          

      end

      else

      begin

 

      end;

        Key := 0;

 

    end;

  end;

-------------------------------------------------------------------------------------

 

상기처럼 하면 왜 사용자에게 묻지 않고

안드로이드 폰에서는 바로 종료가 되는지 알수 없습니다.

 

코드상의 문제인가요...고수님의 답변 부탁드립니다.

 

번호 제목 글쓴이 날짜 조회 수
공지 [프로그래밍 강의] 2021.6~2021.12 관리자 2015.01.22 17155
공지 유용한 관련 사이트 관리자2 2014.03.20 56022
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 99455
1433 [마이그레이션][팁] 함수(또는 변수)에 빨간밑줄이 가고 컴파일 시 Undeclared Identifier 오류 시 조치방법 험프리 2015.10.12 153
1432 delphi dx 및 er stduio 설치후 기존 버전 문제 [1] voyager 2015.10.12 154
1431 FastReport 문의. [1] 회원 2015.10.12 1240
1430 [마이그레이션][팁] TServerSocket, TClientSocket 컴포넌트 추가 방법 험프리 2015.10.13 254
1429 데이터스냅에서 접속 끊어짐에 대처할 수 있는 방법이 있습니까? [2] 거북이 2015.10.15 331
1428 Decimalseparator문의 [2] 똘귀아빠 2015.10.16 534
1427 [마이그레이션][델파이 1~3] WinProcs.dcu, WinTypes.dcu not found 오류 발생 시 대처방법 험프리 2015.10.16 329
1426 비콘 블루투스 끊겼을때 exception 처리에 대해 devdevil0625 2015.10.16 266
1425 [마이그레이션][델파이3>델파이10시애틀] Quick Report 마이그레이션 방법 알려주세요(마이그레이션 후 레포트 폼이 실행되지 않습니다.) [1] 박성민 2015.10.20 398
1424 [세미나][DavidI] BeaconFence의 인식 범위는 어느정도까지 가능한가요? 험프리 2015.10.21 129
1423 날짜 포멧을 설정하고 들어가니 에러가 발생합니다. [3] 거북이 2015.10.21 411
1422 [세미나][DavidI] 이번 세미나에서 FireMonkey 새로운 기능에 대한 소개가 적어 아쉬웠습니다. 험프리 2015.10.21 131
1421 [세미나][DavidI] MidaConverter를 이용한 프로젝트 변환과 비콘 연동에 대해 더 알고 싶습니다. 험프리 2015.10.21 126
1420 [세미나][DavidI] 윈도우 10 폰 타켓 플랫폼 지원 로드맵이 있나요? 험프리 2015.10.21 258
1419 [공유] 라이브바인딩으로 날짜필드를 연결할때 포맷을 지정할 수 있나요? file 험프리 2015.10.21 402
1418 [마이그레이션][델파이6>델파이XE8] 델파이 6으로 개발 된 프로그램을 XE8로 컨버젼 한 후 실행 오류 [1] file 똘귀아빠 2015.10.23 329
1417 [마이그레이션][델파이6>델파이XE8] 프로젝트를 오픈하면 메세지가 뜨는 원인 [1] file 똘귀아빠 2015.10.23 283
1416 콤보박스를 바인딩에서 연결하는 방법을 알려주세요. [2] file 거북이 2015.10.23 504
1415 컴포넌트 사용 관련 [1] 똘귀아빠 2015.10.23 104
1414 ios 개발시 please specify exact device preset uuid [1] kerry 2015.10.25 386