Hallo "LostInSpace",

ändere doch probehalber 'mal ...
if (E1 AND ( 1 shl i)) = (Eingang AND 1 shl i) then next i
in
if (E1 AND ( 1 shl i)) = (Eingang AND (1 shl i)) then next i
Ich hab's aber nicht probiert!

Gruß Dirk