Delphi XE4 / iOS部署系统不工作？

Question

在Delphi > XE4 > Deployment中，我引用了一个名为"res.zip“的文件，它被设置为放置在远程路径"res.zip”下。

然而，"FileExists“在下面的代码中返回false (在iOS 6.1模拟器中运行)：

procedure TFormMain.InitCreate_Uncompress;
var
  H: string;
  P: string;
  Z: TZipFile;
begin
  H := GetHomePath;
  P := H + PathDelim + 'res.zip'; 
  if FileExists(P) then
    begin
      Z := TZipFile.Create;
      try
        Z.Open(P, zmRead);
        Z.ExtractAll(H + PathDelim + 'Library');
      finally
        Z.Free;
      end;
    end
  ;
end;

Answer 1

答案是在Delphi论坛找到的。路径是

GetHomePath + PathDelim + Application.Title + '.app' + PathDelim;