10.3 Android Fehler Tlistbox

[RWunderlich]

Hallo Leute,

ich versuche meine erste Android-App zu schreiben. Es soll ein ASM-Editor werden, ich versuche mit TPath.GetSharedDownloadsPath den Download-Inhalt der App in eine TListBox zu schreiben, damit ich eine der Dateien, die ich vorher von meinem PC auf mein Handy kopiert habe, öffnen kann. Ich habe vorher die Function GetSharedDownloadsPath bereits in der FormCreate mit einer Variablen verbunden.
Der Editor startet auf dem Mobiltelefon einwandfrei, wenn ich jetzt aber auf 'Öffnen' tippe, tauchen in der ListBox keine Dateien auf. FindFirst meldet Fehler 13. Diese Fehlernummer ist 'Permission dinied' zugeordnet. Nun habe 2 Fragen: Was löst dieses Problem aus und was kann ich gegen diesen Fehler unternehmen? Ich wäre für Eure Hilfe im Voraus dankbar.

Viele Grüße
Robert Wunderlich

Delphi-Quellcode:

procedure TTabbedwithNavigationForm.OpenBtnClick(Sender: TObject);
{ Datei -> Öffnen }
var
  oSearch: TSearchRec;
  OpenStr: String;
  oFind: Integer;
begin
// FileListBox löschen
  if OpenFileListBox.items.Text <> '' then
    OpenFileListBox.Clear;
// Nur .ASM-Dateien darstellen
  lblOpenPath.Text:= lblOpenPath.Text;
  try
    OpenStr:= lblOpenPath.Text + '/*.*';
    oFind:= FindFirst(OpenStr, faAnyFile, oSearch); // Fehlermeldung Zugang verweigert
    if oFind = 0 then
      repeat
        if (System.Pos('.asm', oSearch.Name) <> 0) or
          (System.Pos('.ASM', oSearch.Name) <> 0 ) then
        begin
          OpenStr:= oSearch.Name;
          OpenFileListBox.Items.Add(OpenStr);
        end;
      until FindNext(oSearch) <> 0;
  finally
    FindClose(oSearch);
  end;
  TabControl2.ActiveTab:= TabItem7;
end;

[greenmile]

Hatte ich auch, du musst erst die Berechtigung beim Android System anfragen. Delphi findet zwar die Datei (ist vorhanden), aber weder öffnen noch schreiben sind erlaubt. Da ich nur Delphi Berlin einsetze weiß ich nicht, wie man die Berechtigung anfordert.

[philipp.hofmann]

Mindestens die folgenden Artikel sind interessant:
http://docwiki.embarcadero.com/RADSt...Berechtigungen
und folgender Beitrag hier aus dem Forum:
https://www.delphipraxis.net/198285-...terner-sd.html

Da findet sich ziemlich viel zu dem Android-Berechtigungskonzept.

[RWunderlich]

Halllo Leute,

ich hab's geschafft . Ich habe eine Beispielanwendung von Embarcadero genommen.
Vielen Dank für Eure Hilfe, vor allem an Philipp Hofmann. Du hast mich auf die richtige Spur gebracht.

Viele Grüße
Robert Wunderlich