MyChat Scripts: функция mClearAutoScriptsQueue, очистить очередь time-скриптов
Очистить очередь для выполнения запланированных time-скриптов.
Синтаксис
procedure mClearAutoScriptsQueue;
Пример
Проверяется, есть ли в очереди какие-то тайм-скрипты. Если да, то выводится их количество и очередь очищается.
var
iCount: integer;
begin
iCount := mGetAutoScriptsQueueCount;
if iCount > 0 then begin
mClearAutoScriptsQueue;
mLogScript('Queue cleared, ' + inttostr(iCount) + ' scripts deleted', '');
end else mLogScript('Queue is empty', '');
end.
Результат работы скрипта
[17:02:44] (Log "mClearAutoScriptsQueue"): Queue is empty
[17:02:44] (Run "mClearAutoScriptsQueue"): Время выполнения скрипта: 2 мс
[17:02:44] (Run "mClearAutoScriptsQueue"): Скрипт выполнен успешно.
Ещё посмотреть