Сообщения

1

Ваши вопросы / Re: Вопрос по OPC-серверу, работающему как служба

« : 26 Июня 2018, 20:25:30 »

По первой части - OPC-core components установлены, остальное проделаю чуть позже, пока занимаюсь отладкой системы. По второй - запускать сервер скады при старте windows не очень удобно, т.к. при потере питания придётся заново логиниться на удалённый сервер, пока логин пользователя не произведен - сервер скады не стартует, а это крайне не удобно.

2

Ваши вопросы / Вопрос по OPC-серверу, работающему как служба

« : 26 Июня 2018, 14:22:37 »

Добрый день!

Имеется два OPC-сервера, которые работают как службы. Сервер скады их не видит и, соответсвенно, не подхватывает из них данные. Можете подсказать выход из ситуации?

И, хотелось бы иметь возможность запуска самого сервера скады как службы, что бы не было необходимости при каждом выключении компа-сервера логиниться на него и запускать сервер скады. есть ли какое-нибудь решение?

3

Ваши вопросы / Re: Could not load SSL library - Кто виноват и что делать?

« : 19 Апреля 2018, 08:14:21 »

Здравствуйте!
Да, библиотеки присутствуют. Перезагружать пробовал, не помогает. До переноса на сервер разработка велась на ноутбуке с Win 7, там всё работает

4

Ваши вопросы / Could not load SSL library - Кто виноват и что делать?

« : 18 Апреля 2018, 15:28:12 »

Добрый день!

Есть следующая проблема - при запуске теста e-mail сообщений вылезает следующее сообщение:
Could not load SSL library
ОС - win server 2012 R2 standart
Скрин окна с ошибкой во вложении.

5

Ваши вопросы / Re: функция delay

« : 18 Апреля 2018, 14:10:27 »

Огромное спасибо, всё работает!

6

Ваши вопросы / Re: функция delay

« : 10 Апреля 2018, 14:22:21 »

Добрый день!

Пытался повторить описанные выше примеры, почему-то не получилось - сообщение не формируется. Вот весь код моего скрипта типа "Прошла секунда":

Код: (delphi)

begin
//если пришла авария связи
if Svyaz_s_PDU_1_1.Value <> 1 then
  TimerStart(vrTime_1, 0);
if SecondsBetween(vrTime_1.AsDateTime, 0) > 120 then
  begin
    TimerReset(vrTime_1);
    AddMessage(Now, mkAlarm, 'Нет связи с PDU 1.1', True, True);
    text63.Text := 'connect alarm';
  end;
end.

суть такая - если значение переменной Svyaz_s_PDU_1_1.Value стало не равно 1, нужно подождать 120 секунд, потом сформировать аварийное сообщение. Если за это время авария ушла, то нужно сбросить счётчик времени и при новом возникновении аварии заново его запустить.

Буду очень благодарен за помощь