Документация по SCADA системе Simp Light


Содержание:


GetChannelInfo

Функция GetChannelInfo() позволяет получить ряд параметров указанного канала: идентификатор канала, верх и низ шкалы, верх и низ уставки, единица измерения, значение переменной канала.

GetChannelInfo(ChannelName, ID, HighScale, LowScale, HighAlarm, LowAlarm, MeasureUnit, ValueType): Boolean
ChannelName: String Имя канала
ID: Integer Идентификатор канала
HighScale: Extended Верх шкалы
LowScale: Extended Низ шкалы
HighAlarm: Extended Верх уставки
LowAlarm: Extended Низ уставки
MeasureUnit: String Единица измерения
ValueType: Integer Тип переменной канала
Функция возвращает:
True: параметры указанного канала считаны успешно
False: произошла ошибка при получении параметров указанного канала

Типы переменной канала

 Код   Описание
2 (SmallInt) Двухбайтное целое со знаком
3 (Integer) Четырёхбайтное целое со знаком
4 (Single) Четырёхбайтное вещественное
5 (Double) Восьмибайтное вещественное
7 (TDataTime) Дата-время 
8 (String) Строка типа BSTR
11 (Boolean) Логический тип
16 (ShortInt) Однобайтное целое со знаком
17 (Byte) Однобайтное беззнаковое целое
18 (Word) Двухбайтное беззнаковое целое
19 (LongWord) Четырёхбайтное беззнаковое целое 
20 (Int64) Восьмибайтное целое со знаком
999 (TTime) Время


Пример вызова:

 {Pascal Script}
  Var
    ID, hScale: Integer;
    lScale, hAlarm, lAlarm: Double;
    measureUnit, s: String;
    valueType: Word;
    res: Boolean;

  Begin
    res := GetChannelInfo('Температура 1', ID, hScale,  lScale, hAlarm, lAlarm, measureUnit, valueType);    
    if res then
    begin
           s := 'Имя канала = "Температура 1", ' +
           'ID = '              + IntToStr(ID) + ', ' +
           'highScale = '    + FloatToStr(hScale) + ', ' +
           'lowScale = '     + FloatToStr(lScale) + ', ' +
           'highAlarm = '    + FloatToStr(hAlarm) + ', ' +
           'lowAlarm = '     + FloatToStr(lAlarm) + ', ' +
           'measureUnit = "' + measureUnit + '", ' +
           'valueType = '    + IntToStr(valueType);
      AddToDebugLog(s);
   end;          
  end.



Подробную информацию об "Окне отладочной информации" можно почитать здесь.