[Savant]

вар. 1 (следить за границами!!!)
способ универсальный, когда откуда-то надо достать нужное кол-во байтов с любой позиции

Код:

var
  Buffer: array of Byte; // Есть массив байтов
  Pos: Integer;
  Bytes: Cardinal;
  BytesPtr: ^Cardinal;
begin
  BytesPtr := @Buffer[Pos+01];
  Bytes := BytesPtr^;
...

вар. 2
применительно к динамическим массивам

Код:

var
  Buffer: array of Byte; // Есть массив байтов
  Pos: Integer;
  Bytes: Cardinal;
begin
  Bytes := Cardinal(Copy(Buffer, Pos+01, 4));
...