delphi ne manipule pas le bit à bit, il faut donc passer par les opérateurs and&cie.

pour mettre le bit à 1 : valeur or 2^rangbit
pour le mettre à 0 : valeur and not(2^rangbit)