Re: Pøevod pole znakù na reel

[Jan Waclawek]

mmm...

> absolute

Zase som sa nieco naucil... takze nestandardne klucove slovo, ktore je pod
vplyvom Delphi pritomne aj v GNU a FreePascale... :-)

Tipujem, ze v embedded Pascaloch budu aj ine specificke konstrukty na tento
ucel. 

Ten variant record je standardny, aj ked samozrejme jeho funkcia je
implementacne zavisla; vyhodou je, ze je to typ, t.j. jeho pouzitie nie je
viazane na konkretnu premennu, nevyhodou je trocha tazsie pochopitelny
zapis.

wek



----- Original Message ---------------
dobry den
Delam prevod takto:
ale vstup nemam ve stringu ,ale v poli wordu pole[x]

var   velb:array[0..3] of byte;
       velra:single absolute velb;
       pole :array[0..100] of word;

  velb[3]:=hi(pole[22]); velb[2]:=lo(pole[22]); velb[1]:=hi(pole[23]); 
velb[0]:=lo(pole[23]);
  velrkan:=velra;
fanda



Dne 3. 1. 2021 v 11:51 Martin Záruba napsal(a):
> Mám v Pascalu pole 4 znakù,
>
> P : array[1..4] of char;
>
> potøebuji z nìj udìlat èíslo ve formátu real (single). V poli je to 
> uloženo takto exponent, mantisa nejvyšší byte, mantisa nižší byte, 
> mantisa nejnižší byte
>
> Formt single je také 4 byte, ale v opaèném poøadí.
>
> Jak nejlépe udìlat konverzi?
>