Einzelnen Beitrag anzeigen

Benutzerbild von nTE
nTE

Registriert seit: 8. Sep 2003
60 Beiträge
 
#2

Re: Playlist Programmieren....

  Alt 11. Okt 2003, 13:04
Ich weiss gar nicht ob das mit TFileListBox geht.
So wie ich das lese kann die nur alle Dateien aus einem Ordner anzeigen.
Daher würde ich dir eine normale ListBox empfehlen und die kompletten Dateinamen (mit Pfad) in einer TStringList.
Dann überträgst du die Namen aus der TStringList nach TListBox.Items mit
Delphi-Quellcode:
for i := 0 to (myStringList.Count - 1) do
  ListBoxPlaylist.Items.Append(ExtractFileName(myStringList[i]);
Davor sollte die ListBox natürlich leer sein.
Und wenn du dann irgendwelche Änderungen an einer der beiden Listen vornimmst, solltest du diese auch bei der anderen durchführen (z.B. bei verschieben eines Playlisteintrags), denn so kannst du den Index der einen Liste bei der anderen verwenden.

Bsp:
Delphi-Quellcode:
for i := 0 to (ListBoxPlaylist.Items.Count - 1) do
  begin
    if ListBoxPlaylist.Items.Selected[i] then
      Play(myStringList[i]);
  end;
Würde dann ganz einfach die Datei abspielen die gerade angewählt wurde (also bei ListBoxPlaylist -> OnClick einfügen). Dafür muss MultiSelect bei der ListBox natürlich false sein aber warum würdest du auch MultiSelect verwenden wollen. =)
(Wobei die Funktion Play natürlich deine Aufgabe wäre ;)
  Mit Zitat antworten Zitat