Du musst deine Objekte hierarchisch aufbauen.
Das oberste Objekt nenne ich mal
TMediaList.
TMediaList enthält eine Liste von
TMedia.
TMedia beschreibt eine CD; ungefähr so:
Delphi-Quellcode:
TMedia = class(TPersistent)
public
property MediaName:string; // name der CD
property Artist:string; // name des Künstlers/Band
property Songlist : TSongList;
end;
TSongList ist eine StringListe, in die du mit AddObject Objekt vom Typ
TSong verpackt hast.
Delphi-Quellcode:
TSong = class(TPersistent)
public
property SongName:string;
property Duration:double; // Dauer in Sekunden
property MediaIndex:integer; // Liednummer
end;