Длина битовой последовательности

32-хSize: Integer;
16-тиfunction Length: word;

Функция возвращает количество бит содержащихся в битовой последовательности.

Внимание !   Для 32-х разрядной версии значение длины переменной определено как свойство.

Например, переменная - BitStr   содержит битовую последовательность вида (11010001100). После выполнения (для примера, приведенного в таблице) значение переменной - J   будет равно 11.
32-х Var BitStr : TStr_bit; J : Integer; {Объявление переменной}

…

J := BitStr.Size; {Количество бит}

…

16-тиVar BitStr : PStr_bit; J : Word; {Объявление переменной}

…

J := BitStr^.Length; >{Количество бит}

…