Тема: Помогите со скриптом для СЭМа по отбивки часа.
Привет всем! Помогите пожалуйста со скриптом , который будет делать отбивки автоматически часа. я пробовал взял скрипт вот такого характера
var P : TPlayer;
var Song : TSongInfo;
var strFile, strPath, strJingle : String;
strPath := 'H:\музыка\Radio\Отбивки\Часовые';
PAL.Loop := True;
PAL.WaitForTime('XX:59:15');
strFile := strPath + FormatDateTime('hh', now+1/24) + '23-00.mp3';
P := Aux1;
if P <> nil then
begin
Queue.AddFile(strJingle, ipTop);
Queue.AddFile(strFile, ipTop);
P := ActivePlayer;
if P <> nil then P.FadeToNext;
end;
вот , он вроде работает....и время отсчитывает назад до отбивки.....а как подходит время отбивки он звучащий трек резко перематывает в конец и запускает новый трек , без отбивки часа......и опять обратный отсчет до новой отбивки что делать....много лазил по нету так и не разобрался.......
может это из за того что в папке для отбивок лежит только один файлик отбивки - только одного часа - я чисто для пробы делал ...( вот так...помогите!!!! если можно по пунктам и подробно что делать - хочу с этим разобраться.......
Заранее спасибо!