AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Multimedia Delphi Playlist Programmieren....
Thema durchsuchen
Ansicht
Themen-Optionen

Playlist Programmieren....

Ein Thema von pmc · begonnen am 11. Okt 2003 · letzter Beitrag vom 11. Okt 2003
 
Benutzerbild von nTE
nTE

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

Re: Playlist Programmieren....

  Alt 11. Okt 2003, 12: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
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 13:18 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz