moin,
der fehler ist in
ScanDirectory(path+'*.mp3');
da fehlt ein \
ScanDirectory(path+'\*.mp3');
mein fehler, hatte es net getestet.
edit:
Delphi-Quellcode:
if SelectDirectory('Ordner wählen', '', path) then
begin
if (path[Length(path)] <> '\') then
path := path + '\';
ScanDirectory(path + '*.mp3');
end;
so is es richtig.
wenn man nämlich direkt C:\ angibt, steht überall C:\\ballaballa.mp3
(geht zwar auch, sieht aber scheiße aus)
cu nicnacman