Функция SetOffBit() устанавливает указанный бит в "0".
SetOffBit(Value, Bit): Boolean | |
Value: Variant | Целочисленное значение |
Bit: Integer | Номер бита(0-15) |
Функция возвращает: True: успешная запись False: ошибка записи |
{Pascal Script} Var valueNumber, valueBit: Integer; Begin valueNumber := 297; // в двоичной системе счисления 297 = 100101001 valueBit := 3; // нумерация начинается с конца двоичного числа, с 0 по 15 AddToDebugLog('Значение числа ДО: ' + intToStr(valueNumber)); SetOffBit(valueNumber, valueBit); AddToDebugLog('Значение числа ПОСЛЕ: ' + intToStr(valueNumber)); end. |
Подробную информацию об "Окне отладочной информации" можно почитать здесь.