Mach's so, dann kannst du dir die Pointer sparen:
Delphi-Quellcode:
type
TZ80Regs = record
case integer of
0: ( reg8: array [0 .. 3] of byte; );
1: ( reg16: array [0 .. 1] of word; );
end;
Die Typen BYTE und WORD sind übrigens
immer 8 bzw. 16 Bits lang.