Delphi XE4 iOS应用程序适用于simualtor,但不适用于调试设备

时间:2013-07-15 16:47:51

标签: ios delphi

我在应用加载时让应用显示其指定的背景图片。然后它在启动时崩溃运行此代码:

  // unzip own resources like images, data files ettc. 
  FAppDataDirPath := GetHomePath + PathDelim + Application.Title + '.app' + PathDelim;
  P := FAppDataDirPath + 'assets.zip';
  if FileExists(P) then
    begin
      Z := TZipFile.Create;
      try
        Z.Open(P, zmRead);
        Z.ExtractAll(FAppDataDirPath + 'Library');
      finally
        Z.Free;
      end;
    end
  ;

这是我得到的错误:

enter image description here

1 个答案:

答案 0 :(得分:3)

问题在于您使用了错误的方法来获取位置。

切换为使用System.IOUtils.TPath,使用TPath.GetHomePath获取主文件夹,Documents获取Library文件夹,TPath.GetDocumentsPath获取{{1}}文件夹位置。