Сообщения

1

Ваши вопросы / UnicodeString to string?

« : 15 Ноября 2023, 13:58:43 »

Добрый день. Совсем недавно начал пользоваться simple scada. В данный момент учусь писать скрипты. Возникла довольно простая ошибка несовпадения типов, однако я так и не смог найти решение

Код: (delphi)

begin
  case Sender.Name of
  "camera1":
    begin
      TM_Text(camera1).Color := clBlue;
      TM_Text(camera2).Color := clGreen;
      TM_Text(camera3).Color := clGreen;
      camera1.Value := 0;
    end;
    "camera2":
    begin
      TM_Text(camera1).Color := clGreen;
      TM_Text(camera2).Color := clBlue;
      TM_Text(camera3).Color := clGreen;
      camera1.Value := 1;
    end;
  end;
end.

В данном коде возникает ошибка несовпадения типов данных (Incompatible types) при сравнении Sender.Name типа UnicodeString и 'camera1' типа (насколько я понимаю) string. Проблема в том, что ни один из способов приведения к единому типу данных, которые я нашёл, не работает. Есть ли решение моей проблемы?