powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / вещественное 4 байта->в массив bool
5 сообщений из 5, страница 1 из 1
вещественное 4 байта->в массив bool
    #34491557
Progra
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Как преобразовать вещественное число со знаком 4 байта (получаем с устройства) в массив типа bool. Помогите пожалуйста.
...
Рейтинг: 0 / 0
вещественное 4 байта->в массив bool
    #34491583
Granata005
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
в смысле получаешь 101010010 и хочешь сделать это массивом {истина, ложь, истина, ложь, истина, ложь, ложь, истина, ложь} ?
...
Рейтинг: 0 / 0
вещественное 4 байта->в массив bool
    #34491598
Progra
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Получаю в виде вещественной переменной 4 байта, т.е. какое-то число например -324.243, а хочу получить массив из 32 01010... На самом деле эти 4 байта содержат информацию с 32 дискретных датчиков, а по протоколу можно передавать только вещественные 4байта со знаком
...
Рейтинг: 0 / 0
вещественное 4 байта->в массив bool
    #34491675
LeonM
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: 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
вещественное 4 байта->в массив bool
    #34491719
Progra
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Большое спасибо, очень помогли
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / вещественное 4 байта->в массив bool
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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