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