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

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

Перевод типов

Лана Розанова ©   (2002-09-25 12:07:00) 

С СОМ-порта получаю массив:ZNTel (245,179,98,67) of byteЗнаю, что данные должны быть Float.Как мне получить реальное значение. (оно должно быть в районе 225)СПАСИБО!!!

---

Best Before 2024   (2002-09-25 12:14:00) [1]

S := Single(ZNTel);

---

MBo   (2002-09-25 12:12:00) [2]

два способа

procedure TForm1.Button1Click(Sender: TObject);
var a:array[0..3] of byte;
f1:single absolute a;
pf2:^Single;
begin
a[0]:=245;
a[1]:=179;
a[2]:=98;
a[3]:=67;
label1.caption:=FloatTostr(f1);
pf2:=@a[0];
label2.caption:=FloatTostr(pf2^);
end;

---

Наверх