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

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

Перевод чисел в битовые последовательности и наоборот [D3, D5, D6, Win95/98, WinXP]


mrProgrammer ©   (2002-05-11 13:43:00) 

Многоуважаемый народ!

Может кто подскажет, как можно перевести целое число (например, 4-битовое) в биты и наоборот. TBits позволяет только хранить биты и с ними по одному работать. А задача стоит следующим образом: какое целое число (0..15) находится в битах (60..64) массива TBits.
С обратной задачей тоже непонятно. Конечно, все это можно делать вручную, но некрасиво получится...


MBo   (2002-05-11 14:10:00) [1]

Мне кажется, TBits тебе, может, и не нужен.
var i,b:integer;
b:=i shr 28;
так узнаешб содержимое старших 4 разрядов.
Все делается через shr,shl, and, or,not


Наверх

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