procedure TForm1.EintragLoeschenClick(Sender: TObject);
  Begin
    mediaplayer1.Close; //Mediaplayer wird geschlossen
    if (FileExists(PlayList.Strings[Combo.ItemIndex])) then //wenn die datei existiert dann
      Begin
        If Application.MessageBox(' Eintrag wirklich aus Liste entfernen?', 'Hinweis' ,MB_ICONWARNING or MB_YESNO or MB_DEFBUTTON2) = IDYES then //wenn ja geklickt wird dann...
          //HIER soll auf die procedur DeleteEntry gewiesen werden dennn...

..........
[pre]
procedure TForm1.DeleteEntry(index: integer);
  begin;
    playList.Delete(index); //...Hier sind die 2 anweisungen
    Combo.items.Delete(index); // den eintrag zu löschen

  end;
[/pre]