XE5 Android 开发实现手机打电话和发短信 [转]
其實(shí)都可以通過intent和URI調(diào)用系統(tǒng)功能.Windows程序員可以理解成是ShellExecute.這個(gè)是萬金油.可以有調(diào)用各種功能.后面會(huì)介紹.
1.短信息.很簡(jiǎn)單
方法a.不使用Intent而是直接發(fā)短信. smsManager對(duì)應(yīng)的Delphi代碼應(yīng)該是:
| uses ? Androidapi.JNI.JavaTypes,Androidapi.JNI.Telephony; var ? j: JSmsManager; begin ? j := tjsmsmanager.Create; ? j.sendTextMessage(stringtojstring('137114553XX'), nil, stringtojstring('測(cè)試短信'), nil, nil); end; |
至于雙卡雙待用哪個(gè)卡來發(fā)送這些我沒有詳細(xì)研究,有興趣的朋友可以研究下. 方法b.使用Intent啟動(dòng)系統(tǒng)的短信程序: 我猜以后這種方式會(huì)和電話一樣會(huì)合并到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('測(cè)試短信')); ? 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'); ??? //監(jiān)聽電話請(qǐng)用phone.OnCallStateChanged事件 ? end; end; |
這段代碼適用于iOS和Android. Android平臺(tái)上實(shí)際上電話的封裝就是系統(tǒng)的Intent方式調(diào)用.
擴(kuò)展說一下,怎么使用Intent和Action.
簡(jiǎn)單封裝了一個(gè)函數(shù).可以使用Intent調(diào)用各種系統(tǒng)程序.大家理解成Windows的ShellExecute即可.
| uses ? Androidapi.JNI.GraphicsContentViewText, FMX.Helpers.Android, 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() ? 如果是要發(fā)短信等復(fù)雜的應(yīng)用,需要傳遞各種其他的參數(shù).要用到Intent.putExtra()傳遞多個(gè)參數(shù). ? 這里只封裝最簡(jiǎn)單的,具體Intent.putExtra()的用法,可以查詢Java的資料.大把的 ? } ? SharedActivityContext.startActivity(Intent); end; //使用例子: //打電話 Call_URI(TJIntent.JavaClass.ACTION_CALL, 'tel:137114553XX'); //打開地圖顯示某個(gè)坐標(biāo)點(diǎn) Call_URI(TJIntent.JavaClass.ACTION_VIEW, 'geo:38.899533,-77.036476'); //發(fā)送電子郵件 Call_URI(TJIntent.JavaClass.ACTION_SENDTO, 'mailto:wr960204@126.com'); //播放音樂 Call_URI(TJIntent.JavaClass.ACTION_VIEW, 'file:///sdcard/download/最炫民族風(fēng).mp3'); |
最后別忘了配置權(quán)限.Android程序是需要權(quán)限的.?
另外補(bǔ)充一點(diǎn),做Android開發(fā)最好還是有點(diǎn)java開發(fā)經(jīng)驗(yàn),這樣對(duì)Android的體系可以有一個(gè)比較具體的了解,最起碼知道調(diào)用的概念.其他平臺(tái)同理. 先了解多各個(gè)平臺(tái)的概念,然后用XE5開發(fā).XE5解決的是實(shí)際工作的時(shí)候?yàn)榱艘惶状a多個(gè)平臺(tái)使用.
轉(zhuǎn)載于:https://www.cnblogs.com/china1/p/3377646.html
總結(jié)
以上是生活随笔為你收集整理的XE5 Android 开发实现手机打电话和发短信 [转]的全部?jī)?nèi)容,希望文章能夠幫你解決所遇到的問題。
- 上一篇: PWA(Progressive Web
- 下一篇: Android一键反编译工具 jadx