Вниз
Скачать: CL | DM;

Как разложить byte на биты   Найти похожие ветки 

 
ArhangelX   (2006-03-12 11:50) [0]

Помогите пожалуста разложить переменную типа byte на биты!!
Очнь нужно!!


 
Anatoly Podgoretsky ©   (2006-03-12 11:51) [1]

http://podgoretsky.com/cgi-bin/dlcounter/npscnt?file=http://podgoretsky.com/ftp/Docs/Delphi/Podgoretsky/bits.html&file_id=app-bits


 
grisme ©   (2006-03-12 12:23) [2]

если нужно просто смотреть состояние определенного бита в байте, AND"и его на 2-е число с 1-ей в разряде, с номером бита который надо узнать. и проверяй если результат 0, то и бит=0, если ""число с 1-ей в разряде, с номером бита который надо узнать"" :), то соответственно 1!:) Удачи.


 
tesseract ©   (2006-03-12 13:09) [3]

Так прошлое в архиве. Рекомендую посмотреть в архивах форумов - там найдёшь много всякого.
Пример

//                   значение номер бита
function GetBit(value,bitno: integer): WordBool;
begin
result:=false;
if bitno>32 then exit;
if  odd(value shr (bitno-1)) then result:=true else result:=false;
end;



 
Германн ©   (2006-03-13 02:54) [4]

Имхо, Anatoly Podgoretsky ©   (12.03.06 11:51) [1] дал хороший урок для "начинающих"

Но есть ещё один вариант работы с битами - множества. Иногда, а для меня - очень часто, этот вариант наилучший!


 
Defunct ©   (2006-03-13 03:47) [5]

Побродил по ссылкам АП, навеяло мысли, ответ на один из тамошних перлов насчет подвешивания будет: "F0 0F C7 C8" только сработает это дело только на Intel"е.


 
Плохиш ©   (2006-03-13 10:55) [6]


> только сработает это дело только на Intel"е.

Давно уже не сработает.


 
Defunct ©   (2006-03-14 07:16) [7]

Плохиш ©   (13.03.06 10:55) [6]

Конкретно на тот вопрос, с учетом года - сработало бы..



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.027 c
2-1141881603
xroot
2006-03-09 08:20
2006.03.26
Таблица в отчет


15-1141385636
Rule
2006-03-03 14:33
2006.03.26
Как расшарить СОМ-порт по сети


15-1140691446
старый маразматик(с)
2006-02-23 13:44
2006.03.26
что вы думаете за Кашпировского?


15-1141041655
Test Your Soft Team
2006-02-27 15:00
2006.03.26
Акция "Оцени свой софт"


2-1141626781
K_Val
2006-03-06 09:33
2006.03.26
Программа без среды Delphi




   Наверх