Source position: lclclasses.pp line 36
type LazLongRec = packed record
Hi: SmallInt;
Lo: SmallInt;
end;