Winamp Playliste einlesen

[nat]

mal so als idee ausm kopf:

Delphi-Quellcode:

procedure ReadPlayList(const Filename: String; Output: TStrings);
var
  List: TStringList;
  i: Integer;
begin
  List := TStringList.Create;
  try
    GetFilesFromPlayList(Filename, List);
    for i:=0 to List.Count - 1 do
      if IsPlayList(List[i]) then
        ReadPlayList(List[i], Output)
      else
        Output.Add(List[i]);
  finally
    List.free;
  end;
end;

mußt dann nur halt die funktionen
procedure GetFilesFromPlayList(const Filename: String; Output: TStrings); undfunction IsPlayList(const Filename: String): Boolean implementieren.