Hallo an alle,
erstmal muss ich zugeben das ich seit (aus Zeitgründen) rund 6 Jahren nichts mehr mit Delphi gemacht habe.
Zudem war ich gerade am Anfang und hatte noch nicht viel gelernt. Also bitte etwas Nachsicht mit mir.
Jetzt zum Thema.
Ich möchte gerne einen Musik Player von einem Bekannten weiter entwickeln. (Er kann mir leider nicht helfen)
Dort gibt es eine Musikliste (Class TMusicList) für sämtliche MP3 Dateien die aus einem Ordner ausgelesen werden.
Ebenfalls gibt es eine Playliste (Class TMusicList) aus der ich die MP3s dann öffne usw.
Diese Playliste möchte ich gerne zur Laufzeit erstellen und bearbeiten da ich oft mehr als nur eine Playliste benötige.
Wenn mehr als eine Playliste vorhanden ist sollen auch keine doppelten Titel eingefügt werden können egal in welcher der Titel sich befindet.
Ich dachte daran (da die Playliste auch angezeigt werden soll) mit PageControl zu arbeiten und in den Tabs eine Stringgrid zu erstellen wo die Daten dann rein kommen.
Evtl. mit playlist : array of TMusicList
Wie würdet Ihr denn vorgehen?
Hier noch etwas Infos
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20: 21: 22: 23: 24: 25: 26: 27: 28: 29: 30: 31: 32: 33: 34: 35: 36: 37: 38: 39: 40: 41:
| unit UnitMusicList;
type TMusicList = class private mlist : Tlist; filtered_list : TList;
usw.
unit UnitMain;
private musiclist : TMusicList; playlist : TMusicList; procedure TFormMain.FormCreate(Sender: TObject); begin . . . musiclist := TMusicList.Create(); . . . playlist := TMusicList.Create();
constructor TMusicList.Create(); begin . . . mlist := TList.Create; . . .
procedure TFormMain.FormDestroy(Sender: TObject); begin playlist.Free; musiclist.clearList(true); musiclist.Destroy; . . .
destructor TMusicList.Destroy(); begin mlist.Free; end; |
Ich würde mich sehr über Tips, Vorschläge usw. freuen.
Vielen Dank
PS : arbeite mit Delphi 6 PE