在Delphi XE-5 Firemonkey Android App中将文本文件加载到stringlist中

Question

我有一个文本文件（tags.txt），我想用我的应用程序部署。然后我想在启动时将它加载到TStringList中。截至目前，出于测试目的，我只是在一个按钮的onClick事件中。但是，它似乎不起作用。我已经在线阅读了一些资源，包括来自embarcadero和SO的资源。我只是不知道我做错了什么。我得到一个＆＃34;无法打开文件＆＃34; /data/data/com.embarcadero.PTMMobile/files/tags.txt"。没有这样的文件或目录。

这是我的代码：

var
  frmMain: TfrmMain;
  AppPath: String;
  Tags: TStringList;

implementation

{$R *.fmx}

uses System.IOUtils;

procedure TfrmMain.Button1Click(Sender: TObject);
begin
  Tags:= TStringList.Create;
  try
   AppPath := TPath.Combine(TPath.GetDocumentsPath, 'tags.txt');
   Label1.Text:= AppPath;
   Tags.LoadFromFile(AppPath);
   Label2.Text:= IntToStr(Tags.Count);
  finally
   Tags.Free;
  end;
end;

end.

我的远程路径是 assets \ internal

Answer 1

查看截图，原始文件似乎位于应用程序的Debug二进制文件夹中。 尝试在项目文件夹中移动文件并重试（当然，您必须将新文件位置重新添加到部署选项中）。

可以在每次构建时清除二进制文件夹，在尝试将其部署到设备之前删除原始文件。

Hth