我知道如何从Android发送短信。这很简单:
var
smsTo: JString;
smsManager: JSmsManager;
begin
smsManager := TJSmsManager.JavaClass.getDefault;
smsTo := StringToJString('number_xxx');
smsManager.sendTextMessage(smsTo, nil, StringToJString('Test SMS'), nil, nil);
但问题是:如何向送货收件人发送短信?是否可以在Delphi XE5中使用?
感谢您的回答。 乔治
答案 0 :(得分:1)
参数
- 的地址
destinationAddress
将邮件发送到scAddress
是服务中心地址,如果使用当前默认的SMSC,则为nulltext
要发送的邮件正文sentIntent
如果不是NULL,则在成功发送邮件或失败时广播此PendingIntent。结果代码将是 Activity.RESULT_OK表示成功,或者是其中一个错误: RESULT_ERROR_GENERIC_FAILURE RESULT_ERROR_RADIO_OFF RESULT_ERROR_NULL_PDU。基于每个应用程序的SMS控制检查 sentIntent。如果sentIntent为NULL,则将检查调用者 所有未知的应用程序,导致发送较少数量的SMS 在检查期间。deliveryIntent
如果不为NULL,则在将邮件传递给收件人时广播此PendingIntent。原始pdu的状态 报告在扩展数据(“pdu”)中。
您显然错过了代码中的最后两个参数。
Here's如何在Java中实现这一点 - 这非常简单,但Delphi对我们来说有点困难。看看答案here。答案中最有趣的是the first link。
基本上你需要使用JNI包装器直接与Java类通信,因为Delphi没有公开这里需要的功能 - 至少我什么都不知道。
祝你好运!