type ByteBool = Boolean attribute (Size = BitSizeOf (Byte));
The intrinsic ByteBool represents boolean values, but occupies the same memory space as a Byte. It is used when you need to define a parameter or record that conforms to some external library or system specification.
ByteBool is a Borland Pascal extension.
program ByteBoolDemo; var a: ByteBool; begin Byte (a) := 1; if a then WriteLn ('Ord (True) = 1') end.
Boolean (Intrinsic), Boolean, True, False, CBoolean, ShortBool, MedBool, WordBool, LongBool, LongestBool.