当我运行Android应用时,它运行正常。更改某些数据时出现问题,然后点击按钮'保存更改'。然后再次运行App它显示旧数据。
我需要我的应用程序加载我保存一个。
对于Android,我将远程路径设置为assets \ internal - >。\ assets \ 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;
答案 0 :(得分:0)
AppPath := TPath.GetHomePath;
FileName := TPath.Combine(AppPath, 'users.cds');