Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.01.23;
Скачать: CL | DM;

Вниз

биты...   Найти похожие ветки 

 
SeF ©   (2003-01-13 03:06) [0]

поиню выл такой вопрос на форуме, но сейчас понадобилось а не нашел. так вот вопрос: как узнать значение бита (true/false)?


 
PVOzerski ©   (2003-01-13 03:34) [1]

По-моему, получится так:
Пусть X - исследуемая переменная.
Берем число Y, в котором нули все биты, кроме находящегося в интересующей нас позиции.

Result:=(X and Y)<>0;


 
Можно   (2003-01-13 04:22) [2]

и так:

MyType = (Bit0,Bit1,Bit2,Bit3,Bit4,Bit5,Bit6,Bit7);

if Bit3 in X then ...


 
SeF ©   (2003-01-13 07:14) [3]


> PVOzerski © (13.01.03 03:34)

переменная типа integer. но как я понимаю необходимо перебрать max(integer) вариантов а не 32. я не прав?


 
MBo ©   (2003-01-13 07:41) [4]

>необходимо перебрать max(integer) вариантов а не 32. я не прав?
Нет.

var j:integer;

for i:=0 to 31 do
...(1 shl i) and j)...



 
SeF ©   (2003-01-13 10:12) [5]

большое спасибо!!! > MBo © (13.01.03 07:41)
а каким образом установить значение бита?


 
MBo ©   (2003-01-13 10:15) [6]

установить
(1 shl i) OR j
сбросить
(not (1 shl i)) AND j


 
SeF ©   (2003-01-13 10:16) [7]

Биг Сенк To MBo © (13.01.03 10:15)



Страницы: 1 вся ветка

Текущий архив: 2003.01.23;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.014 c
1-72172
Zelius
2003-01-13 19:06
2003.01.23
Проблема с TToolbar при добавлении на него TImage!


3-72110
patrol
2002-12-30 16:51
2003.01.23
переключение раскладки клавиатуры при логоне к Ораклу


14-72485
Andrey-k
2003-01-06 00:34
2003.01.23
TAdvStringGrid v2.4


3-72120
Sirus
2002-12-31 07:19
2003.01.23
Как программно переименовать алиас BDE???


3-72130
АндрейР
2003-01-01 21:00
2003.01.23
Числовые поля в Интербейс