자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다. 
  • 제품설치/등록 오류 문의: 설치/등록 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 17087
공지 유용한 관련 사이트 관리자2 2014.03.20 55928
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 99368
1799 Datasnap 로 3티어 개발중에 [3] 제트콜 2016.06.16 618
1798 베를린 사용하고 있는데요 FireDac계열 컴포넌트 혹시 저만 한글이 깨지나요 [3] file 짧굵 2016.06.17 545
1797 안드로이드 MAC Address 찾기 [3] 광땡 2016.06.20 1815
1796 [베를린] 안드로이드로 빌드하면 Exec Error... PATH C:.... 오류가 발생합니다. [2] file 델사냥 2016.06.21 1117
1795 [RAD서버] DataSnap(데이터스냅)과 RAD서버의 차이점이 무엇인가요? 관리자 2016.06.24 271
1794 [RAD서버] RAD서버 애플리케이션이 지원하는 플랫폼이 무엇인지 궁금합니다. 관리자 2016.06.24 137
1793 [RAD서버] RAD서버에 socket.io 적용 여부가 궁금합니다. 관리자 2016.06.24 216
1792 idtcpserver 서버 찾기 superman 2016.06.25 181
1791 java2op를 이용하안 KT Open API 연동 문제 [3] file 새벽노을 2016.06.27 959
1790 [마이그레이션][델파이5] Excel 컴포넌트[ Servers]가 없어졌어요. file 험프리 2016.06.28 640
1789 Delphi에 동영상을 심을수 있나요? [2] syc 2016.06.28 251
1788 10.1 Berlin Datasnap Server Method문제 불나방 2016.06.29 167
1787 [마이그레이션][팁] 파라독스, dBase 데이터베이스 연결(FireDAC 이용) [1] file 험프리 2016.06.29 860
1786 윈도우10에서 콤보박스 한글처리시 문제...? [3] 헨씀히포 2016.06.30 4148
1785 델파이 platform "Win32" missing or unavailable 오류의 건 최슬기 2016.07.05 280
1784 unable to create process adb:error failed to copy 송세건 2016.07.06 152
1783 unable to create process adb:error failed to copy file 송세건 2016.07.06 253
1782 스트링그리드 라이브바인딩 사용시 데이터 로딩 속도에 관한 질문드립니다~ file 짧굵 2016.07.08 211
1781 필드명을 동적으로 사용하는 방법 [1] 아폴로 2016.07.08 3981
1780 안드로이드 ViewPager 구현 문의 [2] file 손주영 2016.07.08 327