На то есть битовые маски. Например, чтобы узнать, что в четвертом разряде, нужно «наложить» маску 00001000=8.
Пример. Исследуем переменную Variable.
Код:
if Variable and 8 = 8 then ShowMessage('В четвертом разряде 1')
else ShowMessage('В четвертом разряде 0');