БОЛЬШОЙ FAQ ПО DELPHI



Битовые множества

Бит - это байт минус налоги.

В явном виде битовых множеств в языке Object Pascal нет. Но вместо этого можно использовать обычные множества, которые на самом деле и хранятся как битовые. Если множество вам нужно для проверки, установлен ли какой то бит в слове


 type
   PByteSet = ^TByteSet;
   TByteSet = set of Byte;
 var
   W: Word;
 ...
 { если бит 3 в слове W установлен, тогда ... }
   if 3 in PByteSet(@W)^ then ...
 ...
 

В Delphi 2.0 есть специальный класс TBitSet, который ведет себя как битовое множество.Для Delphi 1.0 вы можете написать такой класс самостоятельно.




<< ВЕРНУТЬСЯ В ОГЛАВЛЕНИЕ



Материалы находятся на сайте https://exelab.ru/pro/



Видеокурс ВЗЛОМ