Скрипты Simple-Scada

Важно! Если требуется вывести на мнемосхему имя авторизованного пользователя, то для этого нужно разместить компонент "Текст" на мнемосхеме и задать для свойства "Текст" спец. значение "%#user_login%" (без кавычек). После этого, данный объект будет отображать имя авторизованного пользователя.

Описание

Создать скрипт с типом события "Авторизация пользователя" можно через редактор скриптов. Cкрипт выполняется каждый раз, когда любой клиент выполнил авторизацию пользователя. Имеет параметр ConClientData, который содержит информацию о клиенте. Получить информацию о авторизованном пользователе можно при помощи функции GetCurrentUser.  

Пример скрипта

Допустим, при авторизации требуется отобразить в компоненте "Текст" информацию о авторизованном пользователе и имя клиента, с которого произведена авторизация. Дополнительно, нужно сформировать сообщение с той же информацией. Следует учитывать, что задать имя можно только для десктоп-клиента через утилиту "Options" на ПК-клиенте. Web-клиент не является отдельным приложением и работает в браузере, поэтому он получает случайно сгенерированное имя.

var
  aUser: TM_User;
begin
  // получаем пользователя, под которым выполнена авторизация
  aUser := GetCurrentUser;
 
  // если пользователь получен, то выполняем действия с данными пользователя
  if aUser <> nil then
  begin
    // например, выводим информацию об авторизации в текст
    Text1.Text := 'Пользователь ' + aUser.Login + ' авторизовался с клиента ' + ConClientData.Name;
    
    // или добавляем в архив сообщение с информацией об авторизации пользователя
    AddMessage(Now, mkMessage, 'Пользователь ' + aUser.FullName + ' авторизовался с клиента ' + ConClientData.Name, True, False);
  end;
end.