简体   繁体   中英

Delphi XE4 / iOS deployment system not working?

In Delphi XE4 > Project > Deployment I have a reference to a file called "res.zip" It is set to be placed at remote path "res.zip"

However, "FileExists" returns false in underneath code (Running in iOS 6.1 simulator):

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 was found in Delphi forums. The path is

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

The technical post webpages of this site follow the CC BY-SA 4.0 protocol. If you need to reprint, please indicate the site URL or the original address.Any question please contact:yoyou2525@163.com.

 
粤ICP备18138465号  © 2020-2024 STACKOOM.COM