Что-то я никак не въеду как вычесть число из объединения чисел?
К примеру, воьзьмём двоичные числа. Есть 2 числа:
1) 1100
2) 0110
объединяем эти два числа: 1100 or 0110 = 1110
как теперь из результат исключитьпервое число, чтобы осталось второе? При условии, что объединение может включать различные комбинации чисел, т.е. может быть: 1100 or 0110 or 1000 ... or xxxx и нужно при некотором условии или добавить число в объединение или исключить, но чтобы другие числа можно было бы проверить (результат and число == число).

xor 2 число не подойдет?
a or b xor b = a or 0 = a

Не получится так.
Вот смотри: 1100 or 0110 = 1110
Теперь xor-им результат на первое число: 1110 xor 1100 = 0010 (не равно второму числу)
Не получается xor-ом получить второе число из результата.

Это сообщение отредактировал(а) Ciber SLasH - 26.3.2006, 17:24

А почему объединение это or?

Никак. После логического ИЛИ вобщем случае это невозможно (в отличие от XOR).

Ciber SLasH, ну, а если ничего не вычислять, а просто сохранить нужные значения до того как произведёшь объединение?! А в случае ЧАВО - восстановить попорченное число!

Да, нельзя. Но кое-что восстановить можно.
Это ясно сразу из определения "or":

X Y | Z = X or Y
0 0 | 0
0 1 | 1
1 0 | 1
1 1 | 1

Тогда

Y Z | X = f(Y,Z)
0 0 | 0
0 1 | 1
1 0 | невозможно
1 1 | 0 или 1

Вобщем я всё это спрашивал для того чтобы понять как исключается стиль из функции GetWindowLong.

Вот есть к примеру окно (с хэндлом Wnd), узнаём его стили:

Чтобы исключить из этого окна какой-то стиль (к примеру WS_CAPTION), мы делаем следущее:

А как работает алгоритм исключения не понятно? Ведь функция GetWindowLong возвращает 16-битное число, в котором определённые биты отвечают за стиль окна.

Это сообщение отредактировал(а) Ciber SLasH - 27.3.2006, 13:21

and not в данном случае обнуляет 1 в 16-битно числе в нужном месте и все... Или я ошибаюсь?

Верно.
Короче я понял алгоритм этой функции. Вся соль в том, что каждый бит этого слова отвечает за определённый стиль окна. И поэтому ничего исключать здесь не надо, — надо всего лишь обнулить бит.

Тогда мне бы подошло множество. Из множества можно исключать значения. Но к сожаления в Delphi нельзя определить такое множество: var MN: set of Integer;

А какая цель-то всего этого? Чем не устраивает имеющийся способ?

К примеру отлов нажатий клавиш. Когда срабатывает hook, то нужно проверить, нужно ли блокировать эту клавишу или нет. И ещё есть функция, которая добавляет/исключает ту или иную клавишу из наблюдения.

Я сначала хотел описать множество, в которое бы добавлялась нужная клавиша, если надо её отловить или удалялась эта клавиша, если не надо её отлавливать.
К примеру:

есть также процедура, которая исключает/добавляет клавишу:

и есть процедура отлова клавиш, которая проверяет клавишу на вхождение в множество: