я же задался вопросом значит вылазиет, вылазиет в том случае если файлы найдены. если же они найдены никакой ошибки
сделал так как посоветовали
Код:
PlayList(''); // сформировать список mp3-файлов
if ListBox1.Count = 0 then Exit;
ListBox1.ItemIndex := 0;
Label2.Caption:=ListBox1.Items[ListBox1.itemIndex];