Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / вещественное 4 байта->в массив bool / 5 сообщений из 5, страница 1 из 1
27.04.2007, 08:32
    #34491557
Progra
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
вещественное 4 байта->в массив bool
Как преобразовать вещественное число со знаком 4 байта (получаем с устройства) в массив типа bool. Помогите пожалуйста.
...
Рейтинг: 0 / 0
27.04.2007, 08:47
    #34491583
Granata005
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
вещественное 4 байта->в массив bool
в смысле получаешь 101010010 и хочешь сделать это массивом {истина, ложь, истина, ложь, истина, ложь, ложь, истина, ложь} ?
...
Рейтинг: 0 / 0
27.04.2007, 08:56
    #34491598
Progra
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
вещественное 4 байта->в массив bool
Получаю в виде вещественной переменной 4 байта, т.е. какое-то число например -324.243, а хочу получить массив из 32 01010... На самом деле эти 4 байта содержат информацию с 32 дискретных датчиков, а по протоколу можно передавать только вещественные 4байта со знаком
...
Рейтинг: 0 / 0
27.04.2007, 09:37
    #34491675
LeonM
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
вещественное 4 байта->в массив bool
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
Public Function BoolArray(l As Long) As Variant
    Dim b( 31 ) As Boolean, i As Long
    For i =  0  To  30 
        b(i) = l And  2  ^ i
    Next
    b( 31 ) = l <  0 
    BoolArray = b
End Function
...
Рейтинг: 0 / 0
27.04.2007, 09:53
    #34491719
Progra
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
вещественное 4 байта->в массив bool
Большое спасибо, очень помогли
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / вещественное 4 байта->в массив bool / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]