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

본 게시판은 개발자들이 자유롭게 질문과 답변을 공유하는 게시판입니다.
* 따라서 최대한 정중하게 질문을 올려 주세요.
* 질문을 상세히 작성해 주실 수록 좋은 답변이 올라 옵니다.
* 다른 분들도 참고할 수 있도록 결과 댓글 필수(또는 감사 댓글)
(결과 댓글을 달지 않는 경우 다음 질문에 대한 답변이 달리지 않는 불이익이 있을 수 있습니다.)
-----------------------------------------------------------------------------------------------
KakaoTalk_20180823_172946715.jpg

 

안녕하세요. 올라오고 있는 태풍이 걱정되는 날이네요.

 

 

 

현재 개발은 도쿄로 진행중입니다.

 

블루투스 장치를 검색하고 그걸 선택하면 페어링, 연결 후

 

시리얼포트 서비스로 문자열을 주고받는 앱을 만들고있습니다.

 

지금 문제가 생긴 부분은 블루투스 컴포넌트에 있는 Pair 메소드를 불러서 위 사진처럼

 

해당 디바이스와 페어링을 시도하는 액티비티가 나옵니다.

 

 

그런데 이 액티비티에서 비밀번호을 입력하고 확인버튼을 눌렀을때!

 

저 액티비티가 사라졌을 때의 타이밍? 이벤트를 얻어야하는데 어떻게 접근하는지 몰라서 질문드립니다.

 

현재 해당 부분의 소스코드는 이렇습니다. 리스트에 있는 디바이스를 누르면 호출되는 프로시져입니다.

 

procedure TForm1.lst1ItemClick(const Sender: TCustomListBox;

  const Item: TListBoxItem);

var

  i : Integer;

 

begin

  //검색된 장치를 누르면 바로 페어링

  Bluetooth1.Pair(FScanedDevices.Items[Item.Index]);

 

  //페어링 비밀번호 입력하라는 창이 뜨는데 입력 완료할때까지 대기해야함

 

  //그런데 페어링 액티비티가 떠있어도 이 다음으로 소스는 진행된다...

 

  //검색 리스트에서 누른 이름과 페어링 리스트의 이름과 비교하여 페어링 리스트 인덱스 얻음

  // *페어링 액티비티에서 비밀번호 입력과 확인을 누르지 않았어도 소스는 진행되가지고 

  // *PairedDevices에 저장된 리스트는 없다... 그런데 for문에서 참조하려고 하니 오류 발생 

  for i := 0 to Bluetooth1.PairedDevices.Count - 1 do

  begin

    if Item.Text = Bluetooth1.PairedDevices.Items[i].DeviceName then

    begin

      TargetPaireNo := i;

      Break;

    end;

  end;

 

  ShowMessage('OK');

 

  }

end;

 

  

소스상에 for문 위쪽에 적힌 주석을 보시면 이해되실겁니다.

 

Bluetooth1.Pair를 해서 페어링 액티비티가 나왔는데 사용자가 비밀번호를 입력할때까지 대기해야하지만

 

그 방법을 몰라서 소스는 계속 진행되고 for문에서 아무것도 없는 페어링 디바이스 리스트를 참조하니깐 오류가 납니다.

 

 

 

페어링 액티비티에서 확인을 눌렀는지 안눌렀는지 알수 있는 방법이 있을까요?

 

혹은 좀더 나은 개발 아이디어가 있을까요? ㅜㅜ

번호 제목 글쓴이 날짜 조회 수
공지 [프로그래밍 강의] 2021.6~2021.12 관리자 2015.01.22 15634
공지 유용한 관련 사이트 관리자2 2014.03.20 54464
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 97828
3139 TComport 64bit도 지원가능한가요? [2] 야크 2021.01.12 389
3138 MDI, CHILD 구성 DLL Form Close [1] 가나다 2021.01.11 1317
3137 ClientDataSet1.Data 문의드립니다 [2] 가나다 2021.01.06 1632
3136 10.4.1 에서 iOS Simulator 연결 시 디버그 모드만 동작되고 릴리즈 모드는 죽어버립니다. [2] file 막스뮐러 2021.01.04 389
3135 10.4 버전 DataSnap 연결 에러 질문드립니다. [4] syc 2020.06.25 617
3134 함수 동작중 서브폼 활성화시 먹통 현상 [1] 포세가이 2020.12.31 478
3133 TSQLQuery 사용시 operation not supported [1] 영들사랑 2020.12.30 393
3132 DATASNAP 사용 시 macOS에서 한글깨짐 문제 [1] file 8585 2020.12.29 209
3131 Delphi7 TcontrollScrollbar 관련 질문 [2] temp 2020.12.22 219
3130 구글 플레이스토어에 델파이 10.3.3 으로 만든 앱 배포 등록시 오류 밤바야 2020.12.28 172
3129 Delphi 10.4.1 Sydney - 위치변경후..주소변환 오류문의 [1] silkroad99 2020.12.04 301
3128 갤럭시 s20 삼성ui3.0 업데이트 후 앱 파이어몽키 앱 튕깁니다.?? kerry 2020.12.21 588
3127 macOS Big Sur 에서 [DCC Error] E2597 Undefined symbols for architecture arm64: 에러 나옵니다. file 텔로스김 2020.12.17 234
3126 FMX ICON파일 왜 안되죠? [1] 서준아빠 2020.12.11 277
3125 Multi Tenant 모드일때 REST 요청시 401에러 [1] 초보개발자 2020.12.07 215
3124 델파이10.3.3 API29, 안드로이드 10 변경 문의드립니다. [3] 쟝히 2020.11.23 422
3123 델파이 10 stringgrid 관련 [5] 개미 2020.12.02 288
3122 Andorid, IOS에서 Media (동영상)갤러리를 호출하는 방법 delphiman 2020.12.01 480
3121 10.4 앱 정상실행 후 다시 앱 실행하면 앱 꺼짐현상 문의드립니다. 쟝히 2020.12.01 246
3120 델파이 10 stringGrid 관련문의 [4] file 개미 2020.11.27 293