LEADERSOFT.ru Разработка на заказ программ и сайтов
Форумы по информационным технологиям
 
Регистрация  |  Вход
left
Форумы Минимизировать
ПоискСписок форумов
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: Как испол...
 Тема: Как использовать поле типа Long для хранения флаго
 
 15.06.2007 21:02:40
rafa
7 сообщения


Тема: Как использовать поле типа Long для хранения флаго
Как использовать поле типа Long для хранения флагов. 32 бита - это же 32 логических значения - 32 логических поля не нужно заводить!
Сейчас сам думаю, чего нибудь надумаю, покажу.
Это скорее всего должна быть функция: установить, сбросить, проверить определенный бит.


P.S. Обсуждение разных тем
Автор: rafa от 25.06.2002 18:25:31 Источник ...
 15.06.2007 21:02:40
All
4316 сообщения
1-ый


RE: Как использовать поле типа Long для хранения флаго
А какие проблеммы - с числами можно проводить логические операции AND OR, соответственно установка первого бита в 1 : ЧИСЛО Or Hex(1)




P.S. Обсуждение разных тем
Автор: Николай от 0:00:00 Источник ...
 15.06.2007 21:02:41
All
4316 сообщения
1-ый


RE: Как использовать поле типа Long для хранения флаго
Предыдущий пример не совсем "того".
Для подбора чисел лучше использовать "маску" (1111)(1111)(1111)(1111)
Затем замените нужный разряд на 0 (для сброса флага) и запишите полученное число
Для установки флага используйте "маску" с нулями

Пример:
Sub TT()
Dim X As Long, mask As Long
Dim result As Long
'установка в "1" пятого разряда
X = X Or &H10
'проверка пятого разряда
result = IIf((X And &H10) = 0, 0, 1)
'установка в "0" пятого разряда
X = X And (&HFFFF - &H10)
'проверка пятого разряда
result = IIf((X And &H10) = 0, 0, 1)
End Sub



P.S. Обсуждение разных тем
Автор: Николай от 0:00:00 Источник ...
  Программирование  Microsoft Access. Файлы mdb и accdb  Тема: Как испол...
ПоискПоиск  Список форумовСписок форумов  
right