Media Player

[DeddyH]

Ändere mal diese Stelle

Zitat:

Delphi-Quellcode:

if removePath then
      aResult.Add(ExtractFileName(aPath + FindRec.Name))
     else
      aResult.Add(FindRec.Name);

um in

Delphi-Quellcode:

if removePath then
        aResult.Add(FindRec.Name)      
     else
       aResult.Add(aPath + FindRec.Name);