I had similar problems with client data sets and had to load them into documents and write code to provide permissions and provide file locations in code
like the following excuse the show message code but this app did not make it to the public so code not cleaned up
It’s possible the DLL’s access is not permitted or android has put them somewhere other than the main code file
In the end I had to put the data file into documents folder
You may need to provide a hard coded path to the DLL’s in the form create procedure
version RAD studio 10.4 but worked in 10 2
Is your DLL code 64bit?..another problem for latest versions of Android and a lot depends on the version and android emulator used
Rgds Ray sans
procedure TForm1.FormCreate(Sender: TObject);
Var
sdataPath : String;
begin
MultiView1.CustomPresentationClass := TMultiViewAlertPresentation;
{$IF DEFINED(MSWINDOWS)}
sdataPath := System.SysUtils.GetCurrentDir;
CdsHloans4.FileName := sDataPath+PathDelim+‘Homeloans4.cds’;
if FileExists(‘Homeloans4.cds’) then
begin
//Showmessage('File located at- '+sDataPath+PathDelim+‘PersKb.fds’);
CdsHloans4.LoadFromFile(sDataPath+PathDelim+‘Homeloans4.cds’);
CdsHloans4.Active := True;
end
else
Showmessage(‘Could not find local Main data table at ’ + sdatapath+’..reinstall your app’);
{$ENDIF}
{$IF DEFINED(ANDROID)}
FPermissionWrite := JStringToString(TJManifest_permission.JavaClass.WRITE_EXTERNAL_STORAGE); //Значение на запись
FPermissionRead := JStringToString(TJManifest_permission.JavaClass.READ_EXTERNAL_STORAGE);
PermissionsService.RequestPermissions([FPermissionWrite, FPermissionRead], nil);
sdataPath := System.IOUtils.TPath.Combine(System.IoUtils.tpath.getdocumentspath,‘Homeloans4.cds’);
// or on external GetSharedDocumentsPath ‘LeaseFD.fds’);
if sdataPath =‘’ then
begin
sdataPath := System.IOUtils.TPath.Combine(System.IOUtils.tpath.GetSharedDocumentsPath,‘Homeloans4.cds’);
//showmessage(‘The file Homeloans4.cds was found in shared documents on your memory card’);
end;
//else
//showmessage('Homeloansq.cds was found in documents on your phone ’ +sDataPath);
CdsHloans4.FileName := sDataPath;
{if FileExists(‘Homeloans4.cds’) then
begin
CdsHloans4.LoadFromFile(sDataPath);
CdsHloans4.Active := True;
end
else
Showmessage(‘Could not find local Main data table at ’ + sdatapath+’..reinstall your app’);}
//FPermissionCamera := JStringToString(TJManifest_permission.JavaClass.CAMERA);
VKAutoShowMode := TVKAutoShowMode.Always;
{$ENDIF}
TabControl1.ActiveTab := TabItemInfo;
MultiView1.Mode := TMultiViewMode(3);
Layout5.Visible := False;
end;