Delphi - 在Android上部署和访问本地文件

时间:2017-02-16 09:59:08

标签: android delphi

当我运行Android应用时,它运行正常。更改某些数据时出现问题,然后点击按钮'保存更改'。然后再次运行App它显示旧数据。

我需要我的应用程序加载我保存一个。

我使用的是Delphi Xe8->多设备应用程序。 Using

对于Android,我将远程路径设置为assets \ internal - >。\ assets \ internal \ Deployment

保存更改按钮代码:

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;

1 个答案:

答案 0 :(得分:0)

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