Android实例-如何将文件打包到安装文件(XE8+小米2)

结果：

1.文件名支持英文字母、数字，不支持中文，大小写敏感。

2.文件最好放在根目录下，或是子目录下，如果放在根目外，根目录改名后，找不到文件。

3.打开Project->Deployment->ADD Files->选择文件(支持多选)->Remote Path->assetsinternal(或者assets)。

PS:

assets:对应的是TPath.GetSharedDocumentsPath。

assetsinternal:对应的是TPath.GetDocumentsPath。

还有一种说是支持SD卡，但本人未能实现。希望哪位高手指点。

实例代码： 

unit Unit1;

interface

uses
  System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
  FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs,
  FMX.Controls.Presentation, FMX.StdCtrls, FMX.Objects, FMX.ScrollBox, FMX.Memo;

type
  TForm1 = class(TForm)
    Button1: TButton;
    Image1: TImage;
    Image2: TImage;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation
uses
  System.IOUtils;//需要引入
{$R *.fmx}
{$R *.NmXhdpiPh.fmx ANDROID}

procedure TForm1.Button1Click(Sender: TObject);
var
  sFile1: string;
begin
  // 文件名大小写敏感，切记
  sFile1 := TPath.GetSharedDocumentsPath + PathDelim + '1.jpg';
  if FileExists(sFile1) then
    Image1.Bitmap.LoadFromFile(sFile1);//显示该图片

  // 文件名大小写敏感，切记
  sFile1 := TPath.GetDocumentsPath + PathDelim + '2.jpg';
  if FileExists(sFile1) then
    Image2.Bitmap.LoadFromFile(sFile1);//显示该图片
end;

end.