Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Не получили письмо с кодом активации?

Официальный форум Simple-Scada.

Просмотр сообщений

В этом разделе можно просмотреть все сообщения, сделанные этим пользователем.


Сообщения - AndreyA

Страницы: [1] 2 3
1
Благодарю за оперативный ответ! Все работает

2
Я делал так - создал внутреннюю переменную(ые) Int64 с восстановлением, которая будет хранить количество секунд. Далее в скрипте "Прошла секунда" проверяется состояние переменных работы устройства. Если устройство работает, увеличиваем переменную с количеством секунд на 1. Для вывода времени на мнемосхему используем внутреннюю переменную типа String, используя функцию SecondsToString(КолвоСекунд) - получаем из числа секунд строку вида ЧЧ:ММ:СС.
Здравствуйте,
а не подскажете как вывести текстовую переменную на экран?
тип скрипта по переводу секунд в текстовую переменную у меня - по изменению переменной.
Код: (delphi)
var
  EAST_udiSeconds : Int64;
  vr_EAST_Harbor_WorkHoursAsString: string;
begin
  vr_EAST_Harbor_WorkHoursAsString := SecondsToStr(EAST_udiSeconds);
end.
на экран вывожу переменную TM_Text  и потом не понимаю что делать

3
Благодарю за ответ! Но получается что надо знать текущую дату и начальную чтобы вычислить разницу, и как я понял процедура будет запускаться 1 раз в час и вычислять время наработки. В моем случае подсчет может осуществляться несколько лет и наверно постоянный опрос 1 раз в час всего интервала у каждого механизма будет возможно замедлять работу скады. 

4
Здравствуйте!
Задача в следующем: необходимо подсчитывать время наработки механизмов и выводить часы наработки оператору (не рапорта) как переменные процесса.
сделал скрипт раз в секунду:
Код: (delphi)
const
  TIMEHOUR = 3600;
begin
  if (conv1.Value = 20) and (worksec_conv1.Value < TIMEHOUR) then
    worksec_conv1.Value := worksec_conv1.AsInt + 1;

  if (conv1.Value = 20) and (worksec_conv1.Value >= TIMEHOUR) then
  begin
    workhours_conv1.Value := workhours_conv1.AsInt + 1;
    worksec_conv1.Value := 0;
  end;
end.
Вопрос : как этот скрипт подвязать к 70 обьектам? В этом скрипте сделать копии или можно оптимизировать как шаблон?
conv1.Value = 20 - состояние конвейера (в работе)
Спасибо за внимание         

5
Изменив скорость на 19200 удалось подключиться и получить данные.
на мохе n-port 5130  пины 3 + DATA и 4- DATA
                                         |                |
на ТензоМ                         7 Data +  и 8 Data -

данные с орс ТензоМ забираю клиентом и с него уже в скаду попадают.
1раз в несколько часов орс Тензо М выдает неисправность по портам подключения. Одновременно с этим   пропадает возможность работы с приложением сервера Simple Scada,
проекты нельзя остановить\запустить. Данные на экранах визуализации не обновляются. Через диспетчер задач прерываю выполнение сервера ОРС Тензо М и перезагружаю сервер Simple Scada.

Буду пробовать поставить ОРС DA  сервер от Тензо М на отдельной машине и забирать удаленно.
Upd: возможно зависание было вызвано перегревом оборудования. У нас карьер и летом было довольно жарко. Месяц полет нормальный

6
Здравствуйте! не подскажете какие у Вас были параметры по СОМ порту при подключении к терминалу ТВ-011 Тензо-М?
Мои:
RealCom
Baudrate 9600
Parity None
Data Bits 8
Stop Bits 1
Не могу подключиться, хотя Nport показывает что все Ок TxRx горит желтым


7
Здравствуйте, необходимо создать  кнопки (+1) и (-1) для уставки в частотный привод, есть ли что то подобное с установкой значения переменной через готовую процедуру типа SetValue?
Спасибо!
Сделал пока так через событие OnClick
Код: (delphi)
begin
   if Sender is TM_Object then     // проверяем, что Sender это объект
     with Sender as TM_Object do   // приводим Sender к типу "TM_Object"
       begin
       if Variable.Value < 100 then
          Variable.Value := Variable.Value +1;
       end
end.
Вопрос снят.

8
Отправил Вам на почту

9
 Да со скриптами все понятно, вопрос был в том что этих переменных на одном экране слишком много иногда, и при параметрировании гораздо быстрее в инспекторе обьектов изменять бит переменной для каждого состояния обьекта. Соответственно в скрипте приходится изменять адрес переменной в слове состояния. Универсальный скрипт не очень подходит. Можно
запутаться так как придется постоянно смотреть какая переменная в скрипте и количество скриптов будет конкретно у меня в районе  500. Гораздо быстрее как в обьекте Флажок менять бит.

10
Вопрос с отображением цвета в компоненте Флажок.
Здравствуйте! Планируется ли в  следующих версиях Скады возможность изменения цвета в компоненте Флажок.
Суть проблемы в следующем - в проекте необходимо обращаться к битам переменных и в компоненте Флажок этот способ есть, но не хватает также изменения цвета самого компонента.
То есть изменилась переменная - изменился цвет. В компоненте Фигура такой возможность тоже нет - обращаться сразу к битам, и при большом количестве разных обьектов с многими параметрами это занимает много времени ( написание скриптов). Шаблоны не подходят так как обьекты разные.
Спасибо!

11
Спасибо за оперативный ответ!
Да, такой вариант видел, но неудобно тех.персоналу - в десктопном варианте можно манипулировать стрелками и сразу накладывать на другие параметры. А так просто мы зону увеличиваем.

12
Здравствуйте!
Не подскажете как можно масштабировать шкалу в web клиенте - в обычном все ок. При нахождении курсора мышки  появляется стрелка с 2-мя указателями, а в web  клиенте такого нет ( прилагаю скрины).
Есть ли такая возможность в клиенте?
Спасибо
Браузер Chrome


13
Благодарю за информацию.

14
Здравствуйте!
Необходимо сохранять переменные, введенные оператором в поля.
Активируя во внешней переменной настройку "Автоматическое восстановление переменных", переменная восстанавливается в проекте после рестарта проекта.
Вопрос: значение переменной сохраняется в базе данных ?

15
Здравствуйте!
Каким образом в скрипте можно обратиться к параметру "Подстановка" в объекте TM_Template_Window?
Необходимо считывать "имя подстановки"  и при совпадении открывать необходимое окно.
Спасибо!

Страницы: [1] 2 3