WordRec declares a utility record to store high and low order bytes of a variable.

WordRec = packed record
  case Integer of
    0: (Hi: Byte;
        Lo: Byte;);
    1: (Bytes: array [0..1] of Byte););
end;

struct WordRec {
  Byte Hi;
  Byte Lo;
  array [0..1] of Byte) Bytes;
};