Delphi XE6 Android拨号函数


本文整理自网络,侵删。

 //引用单元:FMX.PlatForm, FMX.PhoneDialer
procedure TForm1.Call(ANum: String);
var
  PhoneDialerService: IFMXPhoneDialerService;
begin

  if TPlatformServices.Current.SupportsPlatformService(IFMXPhoneDialerService,
    IInterface(PhoneDialerService)) then
    if ANum <> '' then
      PhoneDialerService.Call(ANum);

end;
    这里使用的SupportsPlatFormService会返回PhoneDialerService实例!

相关阅读 >>

Delphi cxgrid中回车键光标移到下列

Delphi 从摄像头获取照片并转换为特定的格式

Delphi format中的换行符号是什么

使用Delphi启动和关闭外部应用程序

Delphi使用idhttp 获取 httpsurl内容

Delphi 禁止用键盘左右箭头,去切换pagecontrol页签

Delphi编解码js字符串

Delphi 无法调用cmd nbtstat命令解决办法

Delphi 网络时间校对

建议大家使用fastmm

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...