Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Управление битами

OlegNik © (2008-04-10 15:28:00)
Есть массив байт размером n элементов.
Каждый элемент масива не привышает значение 63, и на его запись требуется 6 бит.
Как сформировать новой масив, в котором на каждый элемент придется 6 бит а не 8.

korneley (2008-04-10 18:24:00) [1]

> Reindeer Moss Eater © (10.04.08 16:52) [7]

Кстати, единственный (для меня), из Новейшей Истории факт, когда такой шнягой пришлось заниматься. Ну вот зачем 160 символов в 140 байт (!) паковать? А с номерами что учудили? Поэтому моё мнение совпадает с [6] - для чего?

Рамиль (2008-04-10 17:31:00) [2]
В семибитовой кодировке и почту можно отправить:)

Reindeer Moss Eater (2008-04-10 16:52:00) [3]
Писать в файл можно минимум байтами.

Зато, например, смс посылается подобной семибитной кодировкой (pdu).

Сергей М. (2008-04-10 16:25:00) [4]

> Как сформировать новой масив, в котором на каждый элемент
> придется 6 бит а не 8

Никак.

Рамиль (2008-04-10 16:25:00) [5]
Я чего то не пойму, шесть бит нужно ради шести бит?

Писать в файл можно минимум байтами.

Так что надо собирать 6 + 2, 4 + 4, 2 + 6 итого четыре последовательности по шесть бит в трех байтах.

OlegNik (2008-04-10 16:18:00) [6]

> Покапать TBits?

Ну хорошо на пример
var
arraybyte : array[0..1] of Byte;
_bit : TBits;

arraybyte[0] := 53;
arraybyte[1] := 60;

_bit := TBits.Create;
_bit.size := 6;
Как дальше arraybyte закинуть в _bit и записать его в файл .
Ну и для проверки как его считать и распоковать в arraybyte?

Reindeer Moss Eater (2008-04-10 15:39:00) [7]
shr,shl,and,or,...

Kolan (2008-04-10 15:37:00) [8]
> [0] OlegNik (10.04.08 15:28)
> Есть массив байт размером n элементов.
> Каждый элемент масива не привышает значение 63, и на его
> запись требуется 6 бит.
> Как сформировать новой масив, в котором на каждый элемент
> придется 6 бит а не 8.

Покапать TBits?

Рамиль (2008-04-10 15:36:00) [9]
Стандартными средствами никак.
Выделить кусок памяти (6 * n) / 8 байт и бегать по нему указателем

Наверх

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