자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다. 
  • 제품설치/등록 오류 문의: 설치/등록 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 17218
공지 유용한 관련 사이트 관리자2 2014.03.20 56089
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 99530
2899 프레임 동적생성후 해제 (메모리 해제가 안되는현상) [2] 가을이다 2014.06.06 3510
2898 Delphi XE5, XE6 에서의 한글 문제 (TFDConnection, TFDQuery) [2] shocks 2014.06.08 3619
2897 XE5 안드로이드 TTS 사용하기 [1] 가을이다 2014.06.08 3141
2896 FireMonkey Form을 Win32 Panel에 올릴 수 있는 방법이 있는지요. [2] 늦바람 2014.06.10 2097
2895 style 다운로드를 어디서해야하나요? [1] 정헌이 2014.06.11 1792
2894 [세미나] TWebBrowser Component 사용시 JavaScript 기능을 사용할 수 있나요? [4] Humphery 2014.06.12 2750
2893 [세미나] 안드로이드 서비스앱을 만들 수 있나요? [1] Humphery 2014.06.12 1921
2892 [세미나] 모바일에서 새로운 OS버전이 나오면 어떻게 하나요? [1] Humphery 2014.06.12 2051
2891 [세미나] 네이티브코드로 개발된 모바일 버전과 파일사이즈가 차이가 납니다. [1] Humphery 2014.06.12 2087
2890 [세미나] 앱테더링은 어느 거리까지 통신이 가능한가요? [1] Humphery 2014.06.12 2448
2889 [세미나] DirectX나 OpenGL자료가 필요합니다. [1] Humphery 2014.06.12 1560
2888 [세미나] 메시지 다이얼로그 표시된 상태에서 절전모드 이후 먹통이 됩니다. [1] Humphery 2014.06.12 2596
2887 [세미나] 스플래쉬 추가후 일부 구동시 문제가 발생합니다. [1] Humphery 2014.06.12 2053
2886 [세미나] 기존의 VCL스타일에서 화면갱신 문제가 있었습니다. XE6에서 개선되었나요? [1] Humphery 2014.06.12 1421
2885 [세미나] 6월 10일 웹세미나의 질문답변 Humphery 2014.06.12 1487
2884 Rectangle 컬러값 변경 문의 [2] 가을이다 2014.06.13 2650
2883 이미지 선택영역 표시하기.. [2] 가을이다 2014.06.14 2489
2882 XE5 스크롤박스 사용시 컴포넌트 드래그시 스크롤 미동작. [2] 가을이다 2014.06.14 2376
2881 XE5 FireMonkey 버튼 컴포넌트 만들기.. [1] file 가을이다 2014.06.16 2425
2880 BOGO 프로모션 툴 다운로드 받는 방법 안내(2015.6.1~2015.6.30 구매고객) 관리자 2014.06.16 7712