В явном виде битовых множеств в языке Object Pascal нет. Но вместо этого можно использовать обычные множества,
которые на самом деле и хранятся как битовые. Если множество вам нужно для проверки, установлен ли какой то бит в слове
type
PByteSet = ^TByteSet;
TByteSet = setof Byte;
var
W: Word;
...
{ если бит 3 в слове W установлен, тогда ... }if 3 in PByteSet(@W)^ then ...
...
В Delphi 2.0 есть специальный класс TBitSet, который ведет себя как битовое множество.Для Delphi 1.0
вы можете написать такой класс самостоятельно.
Если Вас заинтересовала или понравилась информация по разработке на Delph - "Битовые множества", Вы можете поставить закладку в социальной сети или в своём блоге на данную страницу: Так же Вы можете задать вопрос по работе этого модуля или примера через форму обратной связи, в сообщение обязательно указывайте название или ссылку на статью!