Delphi - Развертывание и доступ к локальным файлам на Android

Question

Когда я запускаю приложение для Android, он работает нормально. Проблема при изменении некоторых данных и нажатии кнопки «Сохранить изменения». Затем снова запустите приложение, в котором отображаются старые данные.

Мне нужно, чтобы приложение загрузило меня.

Я использую приложение Delphi Xe8-> Multi-Device.

для Android, я установил удаленный путь к активам \ внутренняя -> \ активы \ Internal \

кнопку Сохранить изменения Код:.

procedure TForm1.Button1Click(Sender: TObject); 
begin 
CDS.SaveToFile(TPath.GetDocumentsPath + PathDelim + 'users.cds'); 
end; 

OnCreate Код:

procedure TForm1.FormCreate(Sender: TObject); 
begin 
CDS.LoadFromFile(TPath.GetDocumentsPath + PathDelim + 'users.cds'); //Embarcadero\Studio\Projects\example\Client\Android\Debug\Client\assets\internal 
end; 

Answer 1

AppPath := TPath.GetHomePath; 
FileName := TPath.Combine(AppPath, 'users.cds');