Danke für die Ausführungen. Lange- und kurze Schreibweise bringe ich schon passend zusammen. Auch wenn ich die Syntax immer noch nicht verstanden habe. Schauen wir mal.
Ja, das ist wirklich klasse.
Jetzt muss ich mal sehen, wie ich das noch unterbringe.
Ich würde erst mal den Dateinamen, des aktuellen Items in eine Variable schreiben und .cue anhängen und dann das lesen der Cue Datei triggern.
Wobei ich da sicherlich noch abfangen muss, dass die Cue Datei nicht immer existiert und nur wenn sie existiert, soll sie auch gelesen werden.
const
MAX_COUNT = 3;
var
i: integer;
count: integer;
cue: IFilePlaylistItem;
begin
CurrentPlaylist.BeginUpdate;
try
count := 0;
for i := 0 to CurrentPlaylist.GetCount - 1 do
if CurrentPlaylist.GetItem(i).GetItemType = pitShow then begin
Factory.CreateMetadataHandler(CurrentPlaylist.GetItem(i)).ReadNativeTags;
CurrentPlaylist.GetItem(i).AutoSearchPosition(ptCueIn);
CurrentPlaylist.GetItem(i).AutoSearchPosition(ptFadeOut);
CurrentPlaylist.GetItem(i).AutoSearchPosition(ptCueOut);
cue := FilePlaylistItem.GetFilename(CurrentPlaylist.GetItem(i))+'.cue';
CurrentPlaylist.GetItem(i).GetCueData.LoadFromCueSheet(cue:);
count := count + 1;
if count = MAX_COUNT then break;
end;
finally
CurrentPlaylist.EndUpdate;
end;
end.