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

Как прочитать и записать содержимое двоичного TBlobField?   Найти похожие ветки 

← →
Мария В.   (2003-04-11 11:43) [0]

В таблице IBase в поле Blob (subtype 0) храниться битовая маска. Задача такая: есть набор CheckBox-ов (RxCheckListBox), нужно прочитать битовую маску из Blob и соответственно отметить CheckBox-ы (если 00000101, то 1-й и 3-й CheckBox отмечены и т.д.).Преобразовывать в текст нельзя - получается ерунда.
Пробовала через TBlobStream, что-то не получается.

Люди,кто уже боролся с Blob-ами, помогите пожалуйста.
Заранее спасибо.

---

← →
Карелин Артем ©   (2003-04-11 12:40) [1]

Итак, записываем маску в BlobStream. Устанавливаем позицию в 0. Читаем в некий буфер данные методом
function Read(var Buffer; Count: Longint): Longint;Если есть желание, то в строку.
Дальше на примере 1 байта так:

var i:TBits;
j:Byte;
bit:Boolean;
begin
...
i:=TBits(j);
bit:=i[1];
end;

---

← →
Johnmen ©   (2003-04-11 12:48) [2]

Для хранения битовых масок лучше использовать integer (если маска не слишком велика :)). Тогда и работа с такими полями проста, быстра и прозрачна...

---

← →
Карелин Артем ©   (2003-04-11 12:50) [3]

Johnmen © (11.04.03 12:48)
Я тоже хотел сгорча сделать тако заявление, но почесав чайник решил, что в RxCheckListBox их может набраться туева хуча.

---

← →
Johnmen ©   (2003-04-11 12:54) [4]

>Карелин Артем © (11.04.03 12:50)

Да. Но я же уточнил "если маска не слишком велика ".

---

← →
Карелин Артем ©   (2003-04-11 12:58) [5]

Факт.

---

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

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



Память: 0.46 MB
Время: 0.01 c