Delphi 手机APP打开一个安卓系统支持的文件,比如 PDF


本文整理自网络,侵删。

 实际上的代码就是这样几行:

procedure btnPdfClick(Sender: TObject);
var
   fName       : String;
{$IFDEF ANDROID}
   Intent      : JIntent;
   URI         : Jnet_Uri;
{$ENDIF}
begin
    fName := TPath.GetSharedDownloadsPath + PathDelim + 'test.pdf';
 
    {$IFDEF ANDROID}
      URI := TJnet_Uri.JavaClass.parse(StringToJString('file:///' + fName));
      intent := TJIntent.Create;
      intent.setAction(TJIntent.JavaClass.ACTION_VIEW);
      intent.setDataAndType(URI,StringToJString('application/pdf'));
      SharedActivity.startActivity(intent);
    {$ENDIF}
end;
有了这几行代码,任何安卓系统支持的文件,都可以打开。

这里对于文件的描述,是一个 URI,因此,理论上,是一个网络文件,比如 http://xxx.xxx.xx/abc.mp4 也是能打开的。

不过根据我的经验,如果你的手机安装了多个播放器,这时候系统会问你用哪个播放器。
--------------------- 
作者:pcplayer 
来源:CSDN 
原文:https://blog.csdn.net/pcplayer/article/details/80852385 

相关阅读 >>

Delphi url 中文编解码

Delphi 加密解密字符串函数

Delphi sqlite 自动编号的实现

Delphi 简单的旋转图像角度代码

Delphi debug与release的区别

移植Delphi7的tclientsocket,tserversocket

Delphi 计算程序运行时间

Delphi检测程序内存泄漏

Delphi d10.x 并行库ppl编程之 tparallel.for

Delphi paramcount、paramstr

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



打赏

取消

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

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

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

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

评论

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