Delphi从ios / Android本地存储打开PDF

aca*_*gno 0 pdf delphi android ios

我试图从本地存储在移动设备上打开PDF文件。

我把文件放到:

iOS的StartUp \ Documents \

资产\内部\(适用于Android)

使用此代码:

filename := TPath.Combine(TPath.GetDocumentsPath, 'file.pdf');
WebBrowser1.Navigate('file://' + filename);
Run Code Online (Sandbox Code Playgroud)

在iOS上工作正常...正确打开pdf

在Android上...什么都没有..没有错误..没有pdf ...如果我尝试打开HTML文件..效果很好。

有什么建议么 ?

安东内洛

Afz*_*Ali 5

{$IFDEF ANDROID}
Uses
   Androidapi.JNI.GraphicsContentViewText,
   Androidapi.Helpers,
   Androidapi.JNI.JavaTypes,
   Androidapi.JNI.Net;
{$ENDIF}
Run Code Online (Sandbox Code Playgroud)
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;
Run Code Online (Sandbox Code Playgroud)