Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Помогите узнать какие биты, выловлены, а какие нет?


Страницы:   1 2

NikNet ©   (2005-08-21 13:40:00) 

Помогите узнать какие биты, выловлены, а  какие нет?

Например, скопировать узнать 0..7 из  WORD и т. д.
Может, есть готовая ф-ция?


KilkennyCat   (2005-08-21 17:21:00) [21]

Не заметил
http://www.delphimaster.ru/cgi-bin/forum.pl?id=1124621293&n=18&web=1
:)


KilkennyCat   (2005-08-21 17:17:00) [22]

function GetBit(const Slovo : Word; const NBit : Word) : boolean;
begin
 result := Slovo and NBit = NBit;
end;


NBit - число, определяющее номер бита. Например, если хотим выловить 16-ый бит (т.е. номер 15), NBit = 32678


vrem   (2005-08-21 14:41:00) [23]

если выловить биты значит сбросить все остальные :)
то = (word) and (число).
число делаешь так - в виндовс калькуляторе переключаешься на "Bin", и набираешь - если бит интересует, то набираешь его 1-й, если не интересует = 0.
согласно [0] интересуют биты 0..7, значит набираешь 8 единиц.
переключаешь калькулятор в "Dec", и читаешь число = 255


Anatoly Podgoretsky   (2005-08-21 13:43:00) [24]

Кто выловил и как выловил.


Страницы:   1 2

Наверх

Титульная страница Поиск, карта сайта Написать письмо