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

안녕하세요. 

안드로이드에서 생성된 파일을 메일 등으로 보내는 루틴은

wwEmailWithAttachment.pas를 통해 구현을 했습니다.

그러나 안드로이드 7.1에서는 되었는데

그 이후 버젼에서는 아래 사진과 같이 에러가 발생합니다.

권한문제인것 같습니다만 해결할 방법은 있을까요?

 

----------- 추신 ---------------

wwEmailWithAttachment.pas 내 안드로이드 부분을 인텐트를 사용하여

다음과 같이 수정했습니다.

{$region 'android'}

{$ifdef android}

procedure wwEmail(Recipients: Array of String; ccRecipients: Array of String;

  bccRecipients: Array of String; subject, Content, AttachmentPath: string;

  mimeTypeStr: string = '');

var

  Intent: JIntent;

  Uri: Jnet_Uri;

  AttachmentFile: JFile;

  i: integer;

  emailAddresses: TJavaObjectArray<JString>;

begin
  Intent := TJIntent.Create;
  Intent.setAction(TJIntent.JavaClass.ACTION_SENDTO);
  Intent.setData(TJnet_Uri.JavaClass.parse(StringToJString('mailto:')));
 
  emailAddresses := TJavaObjectArray<JString>.Create(length(Recipients));
  for i := Low(Recipients) to High(Recipients) do
    emailAddresses.Items[i] := StringToJString(Recipients[i]);
 
  AttachmentFile := TJFile.JavaClass.init(StringToJString(AttachmentPath));
  Uri := TJnet_Uri.JavaClass.fromFile(AttachmentFile);
 
  Intent.putExtra(TJIntent.JavaClass.EXTRA_EMAIL, emailAddresses);
  Intent.putExtra(TJIntent.JavaClass.EXTRA_SUBJECT, StringToJString(subject));
  Intent.putExtra(TJIntent.JavaClass.EXTRA_TEXT, StringToJString(Content));
  Intent.putExtra(TJIntent.JavaClass.EXTRA_STREAM, TJParcelable.Wrap((Uri as ILocalObject).GetObjectID));
 
  SharedActivity.startActivity(Intent);
end;
{$endif}
{$endregion}
 
그러나 실행해보면 ''첨부화일에 대한 권한이 거부되었습니다."라고 화일이 첨부되지 않는데
해결방법이 있을까요?
 

 

번호 제목 글쓴이 날짜 조회 수
공지 [프로그래밍 강의] 2021.6~2021.12 관리자 2015.01.22 39535
공지 유용한 관련 사이트 관리자2 2014.03.20 79037
1812 데이터스냅 콜백 오류 문의 [3] file 회원 2016.10.14 494
1811 Rio10.3.2 업그래이드 후 코드인사이트 먹통 [1] file 개성산전 2019.07.19 494
1810 delphi 10.3.2 TRestClient 구조가 변경된듯 [1] 미스터몽키 2019.09.22 494
1809 MDI Application 에서 TeeChart 를 자식폼에 넣으면 에러 발생하는 문제??? [6] sihwan 2018.03.23 495
1808 폼을 생성할때 ItemIndex를 설정하면 combobox1change 이벤트발생. 오류인듯 -_- [2] 미스터리 2018.08.29 495
1807 일정시간 경과후 소켓에러 발생 [3] file 사랑남 2015.09.18 495
1806 [시작하는 사람들을 위한 델파이 프로그래밍] 모듈 3 - Exercise 1 [2] 관리자 2016.04.29 496
1805 안드로이드 API Level 26 문제 [1] 토끼왕 2018.10.06 496
1804 안드로이드 날짜 팝업창 관련 [2] 씨애틀 2016.03.07 496
1803 delphi 7 구버전 설치 완료 후 실행시 문제 발생 [1] file 라신 2017.01.16 497
1802 XE8 JSON통신 오류 [2] file 똘귀아빠 2021.03.10 497
1801 borland C++에서 장비 interface PC(usart,usb,등) 어떻게 연동 시킬수 있나요? [1] 험프리 2016.09.21 498
1800 델파이Xe2 에서 ExportGridToXLSX 엑셀 다운로드시 건수 [1] 가나다 2019.08.19 498
1799 uses절에 포함된 유닛의 타입을 가져다 쓰려면 어떻게 해야 하나요? [3] 한태수 2019.09.16 498
1798 IOS 새로고침 드래그시 이슈 delphiman 2021.05.06 498
1797 문의 드립니다. [1] radio 2015.03.16 499
1796 블루투스를 사용하고싶습니다. [1] 쀼뱌라라 2018.04.09 499
1795 DataSnap Http관련 문의 [1] lespaul06 2015.04.07 499
1794 (Delphi 10) UPX 압축 문제 [1] 김재욱 2016.01.14 499
1793 [XE8] 안드로이드 이벤트 처리법 [1] 가을이다 2015.10.19 500