0
德爾福XE5(Android應用程序)。發送意圖使用默認的郵件應用程序在Android中
做一個小的應用程序,只是希望能得到一些反饋。
如何發送意圖使用簡單的TEdit主題, 和Tmemo for Message,並將它發送到最終用戶電話上的默認郵件客戶端。 謝謝。
德爾福XE5(Android應用程序)。發送意圖使用默認的郵件應用程序在Android中
做一個小的應用程序,只是希望能得到一些反饋。
如何發送意圖使用簡單的TEdit主題, 和Tmemo for Message,並將它發送到最終用戶電話上的默認郵件客戶端。 謝謝。
像這樣的東西應該幫助的過程。從UI控件傳入值。
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;
我想分享表可以可以做到這一點。 – grant1842
哪一部分是你遇到問題?調用一個意圖?確定使用哪個意圖?這些東西中的一些特定於Delphi的方面? [編輯]使您的問題更具體,請。 –
感謝您的評論。我正在查看分享表以將文本附加到。我認爲我們可能不得不打算做這件事,但分享表看起來很有希望。 – grant1842