Delphi справочник - Форум программистов - Навигация  
 A  B  C  D  E  F  G  H  I  J  K  L  M  N  O  P  Q  R  S  T  U  V  W  X  Y  Z      По первой букве  
System     SysUtils     StrUtils     DateUtils     FileCtrl     ConvUtils     StdConvs     Math     Classes     Dialogs     Types     Variants    ПО Unit   Compiler directives     Directives     Keywords     Types     Variables     Constants     Functions     Procedures    По категории  

форум программистов

Основы Delphi
TBits
Тип
Объект, который может содержать бесконечное число Булевых значений Classes unit
  type TBits;
Описание
Тип TBits содержит гибкий набор битов (Булевых значений). Размер набора может быть изменен в любое время (используя свойство size).

К битам обращаются, используя свойство Bits, подобно этому:

flag := myBits.Bits[2];

или, ещё прощё:

flag := myBits[2];

Есть одна сервисная функция - OpenBit, которая возвращает индекс первого ложного значения. Подобной функции для поиска истинного значения нет.
Похожие команды
Array  Тип данных содержащий индексируемую коллекцию данных

Boolean  Позваляет принимать только True и False значения

 
Пример кода : Простой пример
var
  flags : TBits;         // Наша коллекция переменных Булевых значений
  i : Integer;
begin
  // Создание нашего объекта TBits
  flags := TBits.Create;

  // Добавление несколько элементов в нашу Boolean коллекцию флагов
  flags.Size := 5;

  // И установка нескольких значений
  flags[0] := true;
  flags[1] := true;
  flags[4] := true;

  // Теперь показываем содержимое коллекции
  // Обратите внимание, что начинается с 0
  for i := 0 to flags.Size-1 do
    if flags[i] = true
    then ShowMessageFmt('Bit %d - true',[i])
    else ShowMessageFmt('Bit %d - false',[i]);

  // TBits имеет один основной метод -
  // нахождение индекса первого ложного значения
  ShowMessageFmt('Index of the first false value is %d',[flags.OpenBit]);
end;
Bit 0 - true
Bit 1 - true
Bit 2 - false
Bit 3 - false
Bit 4 - true
Индекс первого ложного значения - 2
 


Оплата за обучение в Kata Academy только после твоего трудоустройства в IT, начни карьеру Middle Java-разработчика



Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки? Slurm подготовили для вас особенный продукт!





форум программистов


© Форум Delphi  |  Форум Pascal   |  Блог программистов   |  Исходники Delphi   |  Автор сайта  |  Ссылки   |  Английская версия