Die Systempartition ist auch versteckt. Lass die Dateien nach \assets\internal bereitstellen, dann findest Du diese im Programm mit TPath.Combine(TPath.GetDocumentsPath, 'filename')
Mit "\assets\internal" hängt alles, mit "assets\internal" läut's wie gehabt.
Mein Code ist:
procedure TForm7.Button1Click(Sender: TObject);
begin
TPath.Combine(TPath.GetDocumentsPath, 'a.wav'); { Internal }
TPath.Combine(TPath.GetSharedDocumentsPath, 'a.wav'); { External }
mediaPlayer1.FileName:= 'a.wav';
mediaPlayer1.Play;
end;
(ich meine, das ist gut lesbar).
Ich kann auch die ersten beiden Zeilen trennen - das Ergebnis bleibt gleich.