자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다. 
  • 제품설치/등록 오류 문의: 설치/등록 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 39903
공지 유용한 관련 사이트 관리자2 2014.03.20 79429
272 FMX에서 1bit 이미지 핸들링이 가능할까요? [2] 뎅혀니 2014.01.18 5788
271 델파이5에서 중국어를 지원할 수 있나요? [1] 하승수 2013.12.24 5853
270 double 형 변수.. ??? [1] 양현숙 2013.07.12 5865
269 Delphi 에서 NI scope 사용하기 양현숙 2012.03.09 5865
268 RadPHP에서 질문 [3] 초딩개발자 2012.03.21 5895
267 Richedit에 대해 질문 있습니다. RTF코드 추출 때문에 그렇습니다. [3] 한림대의료원정보기술센터 2013.12.31 5907
266 XE2 이전버전에 비해서 좋아진 점은 무엇인가요??? [1] 델π 2012.03.19 5997
265 링크 에러 [1] 닉엄뜸 2013.10.23 5998
264 BCB6에서 오라클 10g 연결 [1] happyminhh 2013.07.03 6028
263 DB Express 를 이용한 방법 도움 요청 [1] file 준이킴 2012.03.22 6039
262 XE7델파이로 안드로이드쪽 개발을 하고 있습니다. 그런데~~~ [1] 아기사랑 2014.09.25 6041
261 Firemonkey 안드로이드 버전 출시 일정 문의 c2design 2013.07.09 6069
260 begin...end 342page error [1] chris 2013.05.28 6139
259 Richedit에 대해 하나만 더 여쭙겠습니다. [1] 한림대의료원정보기술센터 2013.11.16 6152
258 dbxconnections.ini 보안 cdrd 2013.04.30 6158
257 RAD XE2의 TChart 컴포넌트에서요 [1] 나도몰라 2012.03.26 6185
256 델파이 7 에서 델파이 xe5 로 마이그레이션에 대하여 [1] 규파파 2014.01.14 6217
255 델파이 XE2 에서 Chart FX 사용과 관련해서? [1] maizard 2013.09.03 6249
254 DelphiXE4 dbxconnections.ini not found [4] file 쿠키 2013.06.23 6292
253 Paserver에서 에러 [1] file 진이한이 2013.04.19 6320