Dim myTime As M_DATETIME
Dim myCommand As String
Dim myTask As MItem
myPlaylist.SchedulerGetByIndex(1, myTime, myCommand, myTask)
M_DATETIME myTime;
string myCommand;
MItem myTask;
myPlaylist.SchedulerGetByIndex(1, out myTime, out myCommand, out myTask);
var
myPlaylist: MPlaylist;
myTime: M_DATETIME;
myTask: MItem;
myCommand: string;
myScheduler: IMScheduler;
begin
myPlaylist:= CreateComObject(CLASS_MPlaylist) as MPlaylist;
pItem.ItemTimesGet(mTimeStart, mTimeStop, eStartType);
myScheduler := myPlaylist as IMScheduler;
myScheduler.SchedulerGetByIndex(1, myTime, myCommand, myTask);
end;