Синтаксис
procedure AddMessageToGroup(ATime: TDateTime; AKind: TM_MessageKind; AGroupID: Integer; const AText: string; AUnconfirmed, ASound: Boolean);
Описание
Добавляет новое сообщение в заданную группу сообщений и записывает его в архив. Узнать ID группы можно выделив нужную группу сообщений в редакторе. Сообщение будет показано на всех клиентах.
Важно! При работе с сообщениями, нужно всегда стараться использовать штатную систему сообщений и шаблонные сообщения. Если требуется не выдавать сообщения при перезапусках проекта, то нужно в настройках отключить опцию "Показывать сообщения по первому изменению". Добавлять сообщения через скрипты целесообразно только в случаях, когда по каким-либо причинам невозможно использовать штатную систему сообщений.
Параметр |
Описание |
---|---|
ATime |
Отметка времени |
AKind |
Тип сообщения. Принимает значения констант: ▪mkMessage - обычное сообщение (серого цвета). ▪mkWarning - предупреждающее сообщение (желтого цвета). ▪mkAlarm - аварийное сообщение (красного цвета). |
AGroupID |
ID группы сообщений |
AText |
Текст сообщения |
AUnconfirmed |
Если "True", то сообщение будет добавлено в список неподтвержденных |
ASound |
Если "True", то сообщение будет сопровождаться звуком |
Пример кода
begin
// добавить сообщение с текущей отметкой времени, в группу с ID = 2,
// с типом – авария(красного цвета), с добавлением в список неподтвержденных и со звуком.
AddMessageToGroup(Now, mkAlarm, 2, 'Высокое давление!', True, True);
end.