Спасибо за совет с arOPC с ним все работает как нужно. Скрипт прописал но так и не заработало... пробывал скрипт прошла 1 секунда и текс:
begin
if ts.IsGoodQuality = False then
begin
out_ts.Value:= 100;
end;
end.
где ts - переменная с опс сервера, а out_ts - виртуальная
Скрипт прописал но так и не заработало...
Нужно было писать так:
begin
if ts.IsGoodQuality then
out_ts.Value:= ts.Value
else
out_ts.Value:= 100;
end.
Но это всё равно плохое решение, т.к. только излишне нагружает проект копированием переменных. Гораздо более правильное решение - использовать опцию OPC-сервера.