Danke marabu genau das habe ich schon gemacht.
Aber jezt habe ich noch eine Frage wie bekomme ich die Dateiendung heraus also z.b. .mp3?
Weil ich noch eine Funktion ingebaut habe so das man die Lieder in die ListBox zihen kan nur muss ja überprüft werden
ob es wirklich eine Datei ist die ich auch abspielen kann.
Ich habe mir die If abfrage so gedacht:
Delphi-Quellcode:
if dateiendung = '.mp3' then
sListBox1.Items.Add(String(PCharFileName))
else
showmessage('Dies ist keine MP3 Datei!');
Vielen Dank im voraus
MFG