Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

преобразование данных [D6]


Coalycat ©   (2002-02-20 13:26:00) 

Дали железяку, которая передает 4 байта в ответе в стандарте IEEE 754. Если кто нибудь этим занимался подскажите способы преобразования массива байт в число.


Digitman   (2002-02-20 14:13:00) [1]

type
TMyArray = array[0..SizeOf(Single)-1] of byte;
...

var
MyArray: TMyArray;
ArrayDataAsNumericValue: Single;
...
ArrayDataAsNumericValue := PSingle(@MyArray)^;


Mbo   (2002-02-20 14:00:00) [2]

если не ошибаюсь - стандарт IEEE 754 о числах с плав.точкой
var a:array[0..3] of byte;
f:single absolute a;

или
var f:single;
p:pointer;
a:array[0..3] of byte;

//прием байтов
p:=@a;
f:=single(p^);

если байты в неправильном порядке, надо при приеме складывать в нужную ячейку или перетасовать


Наверх

Титульная страница Поиск, карта сайта Написать письмо