Delphi XE4 с надстройкой iOS — как встраивать файлы

На Android/Eclipse я могу размещать файлы, например, в папка активов. Могу ли я сделать что-то подобное в Delphi XE4 для iOS?

то есть создать папку, в которой файлы данных и изображений могут быть размещены и автоматически встроены в приложение?

Я знаю, что у меня могут быть изображения, txt и т. Д. В файле формы, но это не то, что мне нужно, если я могу этого избежать.

...

Если я включу res.zip в Delphi > Project > Deployment, мой следующий код вернет false в симуляторе:

FileExists(GetHomePath + PathDelim + 'res.zip')

FileExists(GetHomePath + PathDelim + 'Documents' + PathDelim + 'res.zip')

Для справки, RemoteDir в развертывании был установлен на ./


ios delphi delphi-xe4
person Tom    schedule 19.06.2013    source источник
comment
Не уверен, почему за него проголосовали, поскольку я думаю, что это правильный вопрос.   -  person Jeroen Wiert Pluimers    schedule 19.06.2013

Ответы (1)


arrow_upward
4
arrow_downward

Вы можете сделать что-то вроде этого (это из кода, где у меня есть TClientDataSet, который я использую в iOS.

uses System.SysUtils;

procedure TdtmdlNestoria.DataModuleCreate(Sender: TObject);
begin
  cdsSearches.FileName := GetHomePath + PathDelim + 'Documents' + PathDelim + 'Searchs.xml';
end;

Если вы загружаете файл, который вы развертываете на устройстве, вам также необходимо убедиться, что в исходном коде проекта System.StartUpCopy находится в качестве первого элемента использования. (Щелкните правой кнопкой мыши по проекту и выберите «Просмотреть исходный код»), например.

program Project6;

uses
  System.StartUpCopy,
  FMX.Forms,
  Unit5 in 'Unit5.pas' {Form5};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TForm5, Form5);
  Application.Run;
end.
person DelphiABall    schedule 19.06.2013
comment
Спасибо за Ваш ответ. Я обнаружил, что вы можете использовать раздел Проект › Развертывание, а затем выбрать сохранение всех файлов в удаленной папке StartUp\Documents\. - person Tom; 20.06.2013
comment
К слову о развертывании. У меня есть около 100 файлов малого/среднего размера. Могу ли я заархивировать это в один и развернуть его выше. Затем во время выполнения при первом запуске распаковать файлы в личную папку? (Или мне просто добавить все 100 файлов в Project › Deployment) - person Tom; 20.06.2013
comment
Я отметил как действительный ответ. У меня все еще есть небольшая проблема с проектом/развертыванием, но сейчас я на правильном пути. (Я также нашел документацию страницы описания файловой системы iOS приложения Apple) - person Tom; 23.06.2013