Suma binaria
 

Hola,

He estado buscando por el foro y la verdad es que no he encontrado nada.
Se que en C para hacer la suma binaria se usa un solo ampersan (&), pero en Delphi no encuentro una forma rapida o la instruccion en cuestion.

Como seguramente y para variar no me he explicado bien voy a poner un ejemplo

if (1 & 7) then
OK

esto quiere decir que el 1 (0001) esta dentro del 7 (0111)

el 9 contendria al 8 y al 1 (1001), al 2 no, etc

Ahora mismo esto lo hago pasando los numeros a binario y buscando 1's en las posiciones pertinentes, pero estoy convencido que en Delphi tiene que haber un operador para hacerlo, pero no lo encuentro

Espero haber conseguido explicarme bien

Saludos

Igual que en C, puedes comparar dos números a nivel de bit utilizando los operadores lógicos:

Código Delphi [-]
if (1 and 7) = 1 Then
...

Saludos!

Me falta por poner el = 1
Pero de todos modos
(2 and 6) = 1
deberia ser verdadero y me da falso
Alguna sugerencia?

ahhmmm, en ese caso deberia ser

(2 and 6) = 2