Не меняется цвет объекта, к которому привязан тэг, цвет меняется в скрипте.Не меняется цвет какого именно объекта? Какой код скрипта в котором не меняется цвет? Вы уверены что код скрипта исполняется (для этого должна измениться переменная связанная с объектом)? Перед командой на смену цвета есть какие-то условия? Если есть, то Вы уверены, что эти условия проходят в момент срабатывания скрипта?
tmpCell := tblP1.GetCell(1, 1);
if Pump1Running.AsBool then
tmpCell.Text := "В работе"
else
tmpCell.Text := "Остановлен";
begin
if Sender is TM_Image then
with Sender as TM_Image do
if AsInt = 1 then
Color := clGreen
else
Color := clNone;
end.
Он не работает.Он точно работает, как описан. Он должен быть назначен на событие OnDataChange компонента Изображение. И это изображение обязательно должно быть привязано (основная переменная изображения) к численной переменной. Изображение станет зелёным если привязанная переменная примет значение равное 1. Если любое условие из вышеописанных не выполнится, то скрипт не сработает, что и происходит в Вашем случае. Если разобраться не получается, то вышлите проект на support@simple-scada.com, мы укажем какое именно из вышеперечисленных действий не выполнено.