Playlist abspielen

[profiz]

Und genauso beim hinzufügen:

Delphi-Quellcode:

procedure TForm1.Image9Click(Sender: TObject);
var
playeintrag : TListItem;
begin
   OpenDialog2.FileName := '';
   OpenDialog2.Filter := 'Alle Media-Dateien|*.mp3;*.ogg;*.wma;*.wav|Alle Dateien';

   if OpenDialog2.Execute then
         if BassPlayer1.Open(OpenDialog2.FileName) then
      begin
        playeintrag := ListView1.Items.Add;
        playeintrag.Caption := OpenDialog2.FileName;
        BassPlayer1.Play;
      end;
end;

Was muss ich hier mit dem hinzufügen ändern?

[edit=Daniel B]Delphi-Tags eingefügt. Mfg, Daniel B[/edit]