Ui, das klingt aber kompliziert! Warum baust du dir nicht einfach eine TVideo-Klasse, die ein einzelnes Video repräsentiert., zum Bleistift so
Delphi-Quellcode:
type
TVideo = class(TPersistent)
private
FAbspielDauerMs: Int64;
FTitel: String;
public
published
property Titel: String read FTitel write FTitel;
property AbspielDauerMs: Int64 read FAbspielDauerMs write FAbspielDauerMs;
{etc.}
end;
... und packst dann alle deine
TVideos in eine TObjectList. Wenn du mal eine Liste der Videos hast, z.B.
Delphi-Quellcode:
type
TVideoMgrForm = class(TForm)
{...}
private
MeineVideos: TObjectList;
public
{ Public-Deklarationen }
end;
dann dürfte es ja kein Problem mehr sein, daraus neue
TListItems zu bauen. Das hätte den Vorteil, dass du die Videos auch in einer Text oder Ini-Datei speichern könntest, falls sich doch mal was ändert
Dani H.
At Least I Can Say I Tried