IsAlarmEmitting

Функция IsAlarmEmitting() возвращает состояния системы звукового оповещения об аварийном событии.

IsAlarmEmitting: Boolean
Функция возвращает: True: звук воспроизводится False: звук не воспроизводится

Пример вызова:

{Pascal Script}
Begin
    if IsAlarmEmitting then
       AddToDebugLog('Звук воспроизводится!')
    else
       AddToDebugLog('Звук НЕ воспроизводится!');
end.

Подробную информацию об "Окне отладочной информации" можно почитать здесь.