Source position: syshelph.inc line 798
type TQwordOverlay = bitpacked record |
case Integer of |
0: ( |
AsBit: array [TQwordBitIndex] of Boolean; |
); |
1: ( |
AsNibble: array [TQwordNibbleIndex] of nibble; |
); |
2: ( |
AsByte: array [TQwordByteIndex] of Byte; |
); |
3: ( |
AsWord: array [TQwordWordIndex] of Word; |
); |
4: ( |
AsDword: array [TQwordDwordIndex] of DWord; |
); |
5: ( |
AsQword: QWord; |
); |
6: ( |
AsByteOverlay: array [TQwordByteIndex] of TByteOverlay; |
); |
7: ( |
AsWordOverlay: array [TQwordWordIndex] of TWordOverlay; |
); |
8: ( |
AsDwordOverlay: array [TQwordDwordIndex] of TDwordOverlay; |
); |
end; |