биты Опции

[Reflex]

Здравствуйте а как мне в Delphi или Pascal создать массив битов? элементов больше 100.

нужно уметь с ними:
заполнить все биты 0
изменить бит X на 1
изменить бит X на 0
узнать значение бита X

[volvo]

{ Установить 5-ый бит в 1-цу: }
X := X or ($1 shl 5);

{ Сбросить 5-ый бит в 0: }
X := X and ($FF - ($1 shl 5));

{ Инвертировать бит №5: }
X := X xor ($1 shl 5);

Учти, что биты нумеруются не с единицы, а с нуля !!!