Delphl 11 Android Deploy sorunu

[trfixo41]

(11-05-2023, Saat: 06:26)emozgun Adlı Kullanıcıdan Alıntı: @trfixo41 deployment ile yüklenen dosyaları bulmak için FileExists ve (assets\internal\ için) TPath.GetDocumentsPath fonksiyonlarını kullanmalısınız.
Dahili hafızada Internal storage/data/<application ID>/files altına yükleniyor. Android 12'den itibaren cihazın dosya yöneticisi data altındaki klasörleri göstermiyor. Bilgisayar bağlantısı ile bu klasöre bakabilirsiniz fakat bilgisayardan da dahili dosyaları göremezsiniz. Yani sadece FileExits ile uygulama içinden görebilirsiniz. Bkz Android’de Dosya Depolama ve Paylaşma > DosyalarMevcutmuClick

  dosya := 'myfile1.txt';
  if (FileExists(TPath.Combine(TPath.GetDocumentsPath, dosya))) then
      Memo1.Lines.Add(dosya + ' dahili klasörde mevcut')
  else
      Memo1.Lines.Add(dosya + ' dahili klasörde yok');

Ayrıca dahili klasördeki tüm dosyaları listemek için:

procedure TForm1.ButtonDosyalarCetveliClick(Sender: TObject);
var
 FileList: TStringDynArray;
 DocDir, Dosya, s: string;
begin
 with Memo1 do
 begin
   DocDir := TPath.GetDocumentsPath; //GetHomePath; 
   Text := ('GetDocumentsPath dosyaları :');
   FileList := TDirectory.GetFiles(DocDir);
   for s in FileList do
     Lines.Add(TPath.GetFileName(s));
   GoToTextEnd;
 end;
end;

Dosyaya ulaşmak için:

listbox1.items.loadfromfile(TPath.Combine(TPath.GetDocumentsPath, 'myfile41.txt'));

Teşekkürler yardımların için, sayende çözdüm..