биты Опции

[Reflex]

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

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

[volvo]

Создавай массив байтов (или слов, или длинных слов), и обращайся к нужному биту в нем...

[Reflex]

а как обращаться? ну например массив байтов

[volvo]

Здесь показывалось:
N-ный бит, shr&shl

[Reflex]

как узнать его значение поняла, а как изменить его значение?

[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);

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

[Reflex]

Спасибо щас буду вникать