Попробуй..так
Открываешь файл через OpenDialog1.FileName, затем поставь условие если это <mp3,wav,wma,avi...и тд> тогда добвить в список путь к файлу, а если это <m3u,pls> тогда загрузить этот список.
<Не больой примерчик>
Код:
var i:integer;
mfile:string; // Расширение файла...
begin
if OpenDialog1.Execute then
begin
for i:=1 to length(OpenDialog1.FileName) do //Узнаем расширение файла
begin
if OpenDialog1.FileName[i]='.' then
mfile:=copy(OpenDialog1.FileName,i+1,length(OpenDialog1.FileName);
end;
//Ставим условие
if (mfile='mp3') or (mfile='wav') then
listbox1.items.add(OpenDialog1.FileName);
if (mfile='m3u') or (mfile='pls') then
listbox1.items.LoadFromFile(OpenDialog1.FileName)
end;
Ну вот что то накатал))) возможно есь ошибки под корректируйдумаю должно заработать