TBits

type TBits = class(TObject)

public

  class procedure ReverseByteArray();

  class function Asr32();

  class function Asr64();

  class function RotateLeft8();

  class function RotateLeft32();

  class function RotateLeft64();

  class function RotateRight8();

  class function RotateRight32();

  class function RotateRight64();

  class function ReverseBytesInt32();

  class function ReverseBitsUInt8();

  class function ReverseBytesUInt16();

  class function ReverseBytesUInt32();

  class function ReverseBytesUInt64();

end;

TBits

TObject