delphi xe5 android 开发实现手机打电话和发短信
其实都可以通过intent和URI调用系统功能.Windows程序员可以理解成是ShellExecute.这个是万金油.可以有调用各种功能.后面会介绍. 1.短信息.很简单 方法a.不使用Intent而是直接发短信. smsManager对应的Delphi代码应该是: uses Androidapi.JNI.JavaTypes,Androidapi.JNI.Telephony; var j: JSmsManager; begin j := tjsmsmanager.Create; j.sendTextMessage(stringtojstring(‘137114553XX‘),nil,stringtojstring(‘测试短信‘),nil); end; 至于双卡双待用哪个卡来发送这些我没有详细研究,有兴趣的朋友可以研究下. 方法b.使用Intent启动系统的短信程序: 我猜以后这种方式会和电话一样会合并到TPlatformServices中. uses Androidapi.JNI.GraphicsContentViewText,FMX.Helpers.Android,Androidapi.JNI.Net var uri: Jnet_Uri; Intent: JIntent; begin uri := StrToJURI(‘smsto:137114553XX‘); Intent := TJIntent.JavaClass.init(TJIntent.JavaClass.ACTION_SENDTO,uri); Intent.putExtra(StringToJString(‘sms_body‘),StringToJString(‘测试短信‘)); SharedActivityContext.startActivity(Intent); end; 2.电话 uses FMX.Platform,FMX.PhoneDialer; var phone: IFMXPhoneDialerService; begin if?TPlatformServices.Current.SupportsPlatformService(IFMXPhoneDialerService,IInterface(phone)) then begin phone.Call(‘137114553XX‘); //监听电话请用phone.OnCallStateChanged事件 end; end; 这段代码适用于iOS和Android. Android平台上实际上电话的封装就是系统的Intent方式调用. 扩展说一下,怎么使用Intent和Action. 简单封装了一个函数.可以使用Intent调用各种系统程序.大家理解成Windows的ShellExecute即可. uses Androidapi.JNI.GraphicsContentViewText,Androidapi.JNI.Net; procedure?Call_URI(const?AAction : JString;const?AURI:string); var uri: Jnet_Uri; Intent: JIntent; begin uri := StrToJURI(AURI); Intent := TJIntent.JavaClass.init(AAction,uri); { Intent.putExtra() 如果是要发短信等复杂的应用,需要传递各种其他的参数.要用到Intent.putExtra()传递多个参数. 这里只封装最简单的,具体Intent.putExtra()的用法,可以查询Java的资料.大把的 } ? SharedActivityContext.startActivity(Intent); end; ? //使用例子: //打电话 Call_URI(TJIntent.JavaClass.ACTION_CALL,‘tel:137114553XX‘); //打开地图显示某个坐标点 Call_URI(TJIntent.JavaClass.ACTION_VIEW,‘geo:38.899533,-77.036476‘); //发送电子邮件 Call_URI(TJIntent.JavaClass.ACTION_SENDTO,‘mailto:[email?protected]‘); //播放音乐 Call_URI(TJIntent.JavaClass.ACTION_VIEW,‘file:///sdcard/download/最炫民族风.mp3‘); ? ? 最后别忘了配置权限.Android程序是需要权限的.? (编辑:李大同) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |