Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.05.01;
Скачать: 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 вся ветка

Текущий архив: 2003.05.01;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.019 c
1-612
DeMoNitUs
2003-04-19 00:30
2003.05.01
Как записать/загрузить в exe шник? string овские


14-753
swordent
2003-04-11 18:40
2003.05.01
Мониторинг


1-601
Алексей
2003-04-18 11:12
2003.05.01
нестандартные кнопоки в делфи


14-767
Лесник
2003-04-13 15:39
2003.05.01
Сколько рабочих дней в месяце


4-838
hedgehoge
2003-03-04 02:10
2003.05.01
Передать в консоль