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

델파이로 안드로이드 쪽 USB통신을 만들고 있는데 샘플 소스를 구해서 응용한 결과 에러가 납니다. 그런데 에러나는 곳이 다른곳에서도 쓰이는 것인데 왜 정의가 안되어 있다고 나오는 것인지 알수 없어서 도움을 요청 합니다.

USES절에 Androidapi.JNI.JavaTypes을 정의 했는데도 아래 버튼3 부분 SharedActivityContext.getSystemService(TJContext.JavaClass.USB_SERVICE);에서  SharedActivityContext와 getSystemService가 정의가 안되어 있다고 에러가 뜸니다

그리고 그밑에 jstringtostring(s)도 정의가 안되어 있다고 하는데 아 찾지는 못하겠습니다.


참조하는 웹에 샘플은 다음과 같습니다. http://www.bverhue.nl/g2dev/?p=65 여기에 Androidapi.JNI.USB는 구현을 해놨습니다.


도음을 요청합니다.


unit test;

interface

uses
  System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
  FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.StdCtrls,
  Androidapi.JNIBridge,
  Androidapi.JNI.GraphicsContentViewText,
  Androidapi.JNI.JavaTypes,
  Androidapi.JNI.USB, FMX.Layouts, FMX.Memo;

.

.

.

procedure TForm1.Button3Click(Sender: TObject);
var JavaObject : JObject;
    DeviceList : JHashMap;
    Device : JUSBDevice;
    i : Jiterator;
    s : JString;
begin
  // Device discovery...

  // Get pointer to UsbManager
  JavaObject := SharedActivityContext.getSystemService(TJContext.JavaClass.USB_SERVICE);

  FUsbManager := TJUSBManager.Wrap((JavaObject as ILocalObject).GetObjectID);

  // Get a list of connected slave devices
  DeviceList := FUsbManager.getDeviceList;
  s := DeviceList.toString;
  Memo1.Lines.Add(jstringtostring(s));

  // Get pointer to G2 Device
  FUsbDevice := nil;
  i := DeviceList.values.iterator;
  while i.hasNext do begin
    Device := TJUSBDevice.Wrap((i.next as ILocalObject).GetObjectID);
    if (Device.getVendorId = 4092) and (Device.getProductId = 2) then
      FUsbDevice := Device;
    Memo1.Lines.Add('VendorID ' + IntToStr(Device.getVendorId) + ', ProductID ' + IntToStr(Device.getProductId));
  end;

  if assigned(FUsbDevice) then
    button1.Enabled := assigned(FUsbDevice);


end;

번호 제목 글쓴이 날짜 조회 수
공지 [프로그래밍 강의] 2021.6~2021.12 관리자 2015.01.22 20047
공지 유용한 관련 사이트 관리자2 2014.03.20 58957
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 102574
499 델파이2010 콤보박스 한글입력 오류~! [재질문] [1] file 아놀드 2014.09.30 4474
498 XE7 Datasnap 클라이언트 [1] 수야 2014.09.25 1963
497 secure coding 가이드 문의 (delphi 용) 저팔계 2014.09.26 1448
496 Web base DLL 파일 디버깅 문의 worney 2014.09.24 1312
495 appmethod 로 개발시 서버연결 기정아빠 2014.09.25 1837
» XE7델파이로 안드로이드쪽 개발을 하고 있습니다. 그런데~~~ [1] 아기사랑 2014.09.25 5918
493 VCL / 설치 후 오류. [1] file 쩨리뽀 2014.09.20 2048
492 XE7에서 datasnap 퍼포먼스가 향샹되었나요? [1] 늑대와춤을 2014.09.17 1442
491 델파이2010 콤보박스 한글입력 오류~! [1] file 아놀드 2014.09.18 2462
490 [XE7] 코드 인사이트 관련 버그 리포팅합니다. [1] file 소중한꿈 2014.09.19 2061
489 [Kinvey] BaaS 강좌 실습 과정에서 에러가 발생합니다. file 소중한꿈 2014.09.20 1810
488 [xe7] baas관련 컴파일시 에러가납니다.. [10] 윤우민 2014.09.09 2502
487 [세미나] 평가판 사용자도 교육 참석 가능한가요? 평가판 사용자는 교육비용이 더 비싼가요? [2] Humphery 2014.09.17 1185
486 [XE7] 트라이얼 버전에서 SVN 관련 기능의 제한이 있는지 문의드립니다. [2] 소중한꿈 2014.09.16 1959
485 [세미나] XE7 온라인 세미나(2014년 9월 16일) 질문과 답변 Humphery 2014.09.17 1138
484 [세미나] 안드로이드 전화통화를 녹음할 수 있는 백그라운드 앱을 만들 수 있을까요? [1] Humphery 2014.09.17 2773
483 [세미나] C++빌더 XE7에 자바 라이브러리 호출이 가능한가요? [1] Humphery 2014.09.17 2128
482 [세미나] iOS앱을 개발하라면 맥북이 필요한가요? [1] Humphery 2014.09.17 1827
481 [세미나] XE7에서는 컴파일 크기가 개선되었나요? [1] Humphery 2014.09.17 1406
480 [세미나] 세미나를 다시 볼수는 없나요? [1] Humphery 2014.09.17 1315