Hey also Sufu benuzt ...
Titel ...is mir nix anderes eingefallen ....also danke für euer verständniss
Also mein Problem :
Delphi-Quellcode:
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]
weitere vllt. benötigte infos: meine playlist ist eine stringlist
ich hoffe für hilfe und danke im vorraus
mein ausgabeformat eine combobox