WeirdRecord
type TWeirdRecord = record
bVal: Byte
iVal: Smallint
lVal: Longint
pbVal: ˆByte
piVal: ˆSmallint
plVal: ˆLongint