Скрипт для определения времени события

Avatar
  • обновлен
Здравствуйте. Не могли бы помочь со скриптом на Pascal'e?
Задача стоит следующая: Необходимо чтобы происходила запись текущего времени в "виртуальный канал 1" по изменению значения в логическом "виртуальном канале 2".
Avatar
demitsury
добрый день


каакую задачу хотите решить ?
Avatar
Александр
Если по-русски объяснять, то примерно так: при нажатии на элемент мнемосхемы (кнопка) должно отображаться время нажатия.
Avatar
SIMP Tech (Сергей)
День добрый.

Если по-русски объяснять, то примерно так: при нажатии на элемент мнемосхемы (кнопка) должно отображаться время нажатия.

На кнопке отобразить время нажатия не получится. Вывести рядом на какой нибудь индикатор можно. Подойдёт?
Avatar
Александр
Конечно подойдет
Avatar
SIMP Tech (Сергей)
День добрый.

Тогда можно сделать следующим образом:

1. создаем виртуальный канал, с типом данных - time, имя канала для примера "test"
2. виртуальному каналу добавим скрипт - тип запуска - по событию записи.
3. текст скрипта совсем простой
begin WriteValue('test', TimeToStr(Now)); end. 4. на мнемосхему добавим кнопку и индикатор, оба элемента привяжем к нашему каналу "test"

При нажатии на кнопку на индикаторе будет выводится время нажатия.
Avatar
Александр
Опробовал все в точности как вы посоветовали, но время не отображается.
Avatar
SIMP Tech (Сергей)
Опробовал все в точности как вы посоветовали, но время не отображается.

Моя ошибка, недосмотрел))). Подправим немного скрипт:

begin WriteValue('test', Now); end.
Avatar
Александр
Большое спасибо.
Avatar
Александр
Не подскажите как лучше реализовать следующую задачу? Имеется схема паропровода с несколькими задвижками. Необходимо чтобы при нажатии на задвижку менялся ее цвет и цвет трубы за ней, а также выводилось время нажатия на задвижку. Плюс ко всему велась запись времени нажатия в файл в виде "Задвижка 1ПП-1 открыта: время", и "Задвижка 1ПП-1 закрыта: время". Для большей ясности прикрепляю папку slproject. Мнемосхема - "схема".