TPlaylist neue Komponente!

[omata]

So müsste es gehen...

Delphi-Quellcode:

type
  TTracks = record
    Title: String;
    time: String;
    path: String;
  end;
:
  private
    { Private-Deklarationen }
    function GetTracks(index: Integer): TTracks;
:
  public
    { Public-Deklarationen }
    property Track[index:integer]:TTracks read GetTracks;
:
function TPlaylist.GetTracks (index: Integer): TTracks;
begin
  Result.Title:= cells[1, index];
  Result.time := cells[2, index];
  Result.path := cells[4, index];
end;

Gruss
Thorsten