Schönen guten Tag!
Ich habe folgendes Problem:
Insgesamt habe ich 5 Apps entwickelt die alle auf eine gemeinsame Datei zugreifen. Bisher hat das auch wunderbar funktioniert. Aber seit ca. 3 Wochen habe ich keinen Zugriff mehr auf diese gemeinsame Datei.
Ich greife über nachstehende Funktion zu:
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
| procedure TForm2.Button3Click(Sender: TObject);
var
datei,
pfad : string;
h : TStringlist;
begin
pfad := TPath.GetSharedDocumentsPath;
datei := pfad + 'elkb/System.TXT';
h := TStringlist.Create;
try
Listbox1.Items.Add(datei + ' wird eingelesen');
Listbox1.Items.LoadFromFile(datei,TEncoding.UTF8);
Listbox1.Items.Add('... wurde eingelesen');
except
ListBox1.Items.Add('... und verursacht einen Fehler');
end;
end; |
Wenn ich eine Vorgängerversion meiner App am Handy installiere funktioniert wieder alles wie gewohnt.
Kann mir jemand weiterhelfen? Habe ich versehentlich eine Einstellung geändert die sich so auswirkt?
Ich verwende Delphi 11.0 und verschiedene Samsung Geräte (S21 pro, A70)
Danke für eure Unterstützung
Moderiert von 
Narses: Delphi-Tags hinzugefügt.
