SetAll;
Метод SetAll устанавливает всем битам массива значение True.
Sub UserProc;
Var
BitArr: IBitArray;
Begin
BitArr := New BitArray.Create;
BitArr.Length := 30;
BitArr.SetAll;
End Sub UserProc;
После выполнения примера будет создан битовый массив «BitArr», всем элементам массива будет установлено значение «True».
См. также: