Вид для печати
Цитата: Сообщение от Евгений Кислов Код: // очистка истории тревог из кода программы VAR itfAlarmConfiguration : AlarmManager.IAlarmConfiguration; itfAlarmConfiguration7 : AlarmManager.IAlarmConfiguration7; END_VAR FOR i := 0 TO AlarmGlobals.g_AlarmHandler.AlarmConfigurationCount - 1 DO itfAlarmConfiguration := AlarmGlobals.g_AlarmHandler.GetAlarmConfiguration(i); IF __QUERYINTERFACE(itfAlarmConfiguration, itfAlarmConfiguration7) THEN // сохраняем в журнале текущие тревоги itfAlarmConfiguration7.ClearHistory(xKeepActiveAlarms := TRUE); END_IF END_FOR Добрый день. А можно попросить код полного удаления сообщений из базы ? CodeSys 3.5 SP17 Patch 3 + (32-bit)
// очистка истории тревог из кода программы VAR itfAlarmConfiguration : AlarmManager.IAlarmConfiguration; itfAlarmConfiguration7 : AlarmManager.IAlarmConfiguration7; END_VAR FOR i := 0 TO AlarmGlobals.g_AlarmHandler.AlarmConfigurationCount - 1 DO itfAlarmConfiguration := AlarmGlobals.g_AlarmHandler.GetAlarmConfiguration(i); IF __QUERYINTERFACE(itfAlarmConfiguration, itfAlarmConfiguration7) THEN // сохраняем в журнале текущие тревоги itfAlarmConfiguration7.ClearHistory(xKeepActiveAlarms := TRUE); END_IF END_FOR
Цитата: Сообщение от skozirev@yandex.ru Добрый день. А можно попросить код полного удаления сообщений из базы ? CodeSys 3.5 SP17 Patch 3 + (32-bit) Добрый день. В процитированном сообщении и приведен "полный код". Чтобы удалить тревоги, которые в данный момент являются активными - надо в вызове сделать "(xKeepActiveAlarms := FALSE)"
Цитата: Сообщение от Евгений Кислов Добрый день. В процитированном сообщении и приведен "полный код". Чтобы удалить тревоги, которые в данный момент являются активными - надо в вызове сделать "(xKeepActiveAlarms := FALSE)" Спасибо ...