TInt64

type TInt64 = packed record

  case Byte of

    0: (

        Lo: LongInt;

        Hi: LongInt;

      );

    1: (

        LoLo: Word;

        LoHi: Word;

        HiLo: Word;

        HiHi: Word;

      );

    2: (

        LoLoLo: Byte;

        LoLoHi: Byte;

        LoHiLo: Byte;

        LoHiHi: Byte;

        HiLoLo: Byte;

        HiLoHi: Byte;

        HiHiLo: Byte;

        HiHiHi: Byte;

      );

end;