发送意图使用android系统中默认的邮件应用程序 [英] Send Intent to use default mail app in android

问题描述

德尔福XE5（Android应用程序）。

Delphi XE5 (Android App).

做一个小的应用程序，只是想获得一些反馈。

Doing a small app and just want to get some feedback .

我如何发送一个意图使用一个简单的TEDIT为主题，
 和TMemo控件的消息，并将其发送到默认邮件客户端的最终用户的手机上。
谢谢你。

How can I send an intent to use a simple TEdit for Subject, and Tmemo for Message and send it to the default mail client on the end users phone. Thanks.

推荐答案

像这样的东西应该帮助的过程。从UI控件的值传递。

Something like this ought to help the process. Pass in the values from the UI controls.

uses
  FMX.Helpers.Android,
  Androidapi.JNIBridge,
  Androidapi.JNI.JavaTypes,
  Androidapi.JNI.GraphicsContentViewText;
...
procedure CreateEmail(const Recipient, Subject, Content: string);
var
  Intent: JIntent;
  Recipients: TJavaObjectArray<JString>;
begin
  Intent := TJIntent.JavaClass.init(TJIntent.JavaClass.ACTION_SEND);
  Recipients := TJavaObjectArray<JString>.Create(1);
  Recipients.Items[0] := StringToJString(Recipient);
  Intent.putExtra(TJIntent.JavaClass.EXTRA_EMAIL, Recipients);
  Intent.putExtra(TJIntent.JavaClass.EXTRA_SUBJECT, StringToJString(Subject));
  Intent.putExtra(TJIntent.JavaClass.EXTRA_TEXT, StringToJString(Content));
  //Intent.setType(StringToJString('plain/text'));
  Intent.setType(StringToJString('message/rfc822'));
  //SharedActivity.startActivity(Intent);
  SharedActivity.startActivity(TJIntent.JavaClass.createChooser(Intent,
    StrToJCharSequence('Which email app?')));
end;

这篇关于发送意图使用android系统中默认的邮件应用程序的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！