Содержание:


GetBit

Функция возвращает значение указанного бита заданной переменной.

Синтаксис

GetBit(Value: Variant; Bit: Integer): Integer

Входные параметры
Имя параметра
Тип параметра
Описание
Value Variant  Целочисленного значение
Bit Integer  Номер бита(0-15)
Выходные параметры
Тип параметра  
Описание 
Integer  Возвращаемое значение:
 1 или 0

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

 
  Var
     valueNumber, valueBit, res: Integer;
                                                                           
  Begin
     valueNumber := 297;   // в двоичной системе счисления 297 = 100101001
     valueBit := 3;              // нумерация начинается с конца двоичного числа, с 0 по 15
     res := GetBit(valueNumber, valueBit);
     WriteValue('Virtual channel 99', 'Значение бита №' + IntToStr(valueBit) + ' равно: ' + IntToStr(res));    
  end.