[Lazarus] reading a little endian long.

[Mattias Gaertner]

On Sun, 21 Dec 2008 12:04:37 +0200
"Dave Coventry" <dgcoventry at gmail.com> wrote:

> Hi Mattias,
> 
> Is there an equivalent for
> 
> shortv:=buffer[5];
> shortv+=buffer[6] shl 8;

shortv:=LEtoN(PSmallInt(@buffer[5])^);


Mattias


> > longv:=LEtoN(PLongint(@buffer[5])^);
> >
> >
> >> be the same as:
> >>
> >> longv:=buffer[5];
> >> longv+=buffer[6] shl 8;
> >> longv+=buffer[7] shl 16;
> >> longv+=buffer[8] shl 24;