Danke für den Tip!
Folgende Testfunktion:
Delphi-Quellcode:
...uses Androidapi.IOUtilsEx;
procedure TForm1.Button3Click(Sender: TObject);
var
dir: string;
fn: string;
begin
dir := GetExternalSDCardDirectory;
showmessage(dir);
showmessage(GetSysExternalStorage);
if isExternalStorageWritable then
showmessage('beschreibbar')
else
showmessage('readonly');
fn := dir + PathDelim + 'test.txt';
Memo1.Lines.LoadFromFile(fn);
CreateDir(dir + PathDelim + 'testdir');
end;
'/storage/34AD-43FD'
'/sdcard'
'beschreibbar'
und eine dort liegende Datei test.txt kann ich lesen, habe also die SD-Karte gefunden!
Aber ich kann kein Verzeichnis erstellen: der Code läuft ohne Fehlermeldung im Debugger durch aber das Verzeichnis entsteht nicht!
Hat jemand eine Idee dazu?
Ciao
Stefan